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EXPERIENCIA Y PRACTICAS EN LOGO * 


- Parar y continuar 


LGUNAS versiones de Logo 
disponen de dos primitivas 
con las cuales podemos de- 
tener, y posteriormente con- 
tinuar, la ejecución de un 


procedimiento. 
Se trata de: 
— PAUSA 
— CONTINUA 


Conozcamos el funcionamiento de estas 
dos nuevas primitivas. 


— PAUSA 

Con esta primitiva podemos detener la 
ejecución de un procedimiento en el momen- 
to que deseemos. Para ello lo único que tene- 
mos que hacer es escribir la orden PAUSA en 
aquel punto del procedimiento que lo requie- 
ra. 

La diferencia de poner PAUSA a poner 
ALTO, es que si utilizamos PAUSA, la ejecu- 
ción del procedimiento se detendrá hasta que 
nosotros queramos continuar, y ALTO detiene 
la ejecución por completo. 

La ejecución de un procedimiento se 
podrá detener bien utilizando la orden PAU- 
SA en el conjunto de las órdenes que lo for- 
man, o bien pulsando la tecla F5 en el momen- 
to que lo deseemos. 

En ambos casos, recibiremos un mensa- 
je en el que nos avisa que se ha producido una 
pausa. Este mensaje nos dice también el nom- 
bre del procedimiento y la orden en la que se 
ha producido. 

Por ejemplo, si definimos el siguiente 
procedimiento: 


? PARA A :V 
> MESUV 
MESS 
>AvV+1l 
> FIN 


y ahora lo ejecutamos: 
2 A1 


en la pantalla empezarán a aparecer todos los 
números a partir del uno. Si no detenemos la 
ejecución, el procedimiento no pararía hasta 
que apareciese un número enormemente 
grande. 

Si en cualquier momento pulsamos F5, 
en la pantalla aparecerá: 


PAUSA..EN A 
ESTI 
A? 


Nos dice que se ha producido una pau- 
sa en el procedimiento A al ir a ejecutar la or- 
den ES :V, 

A continuación aparece el nombre del 
procedimiento seguido de la interrogación, lo 
que indica que se está en una pausa y no en 
el nivel superior. 

Si ahora introducimos en el procedi- 
miento la orden PAUSA: 


? PARA A :V 
EV 

> MESS 

> PAUSA 
>AvVv+l 
> FIN 


y lo ejecutamos: 
2A1 
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en la pantalla aparecerá: 


1 

PAUSA... EN A 

PAUSA 

A? 

La pausa se ha producido después que 
se ha escrito el primer número, en el procedi- 
miento A y al ir a ejecutar la orden PAUSA. 

Durante el tiempo que dura la pausa, 
podemos teclear las órdenes que deseemos 
de forma interactiva. 

La ejecución de un procedimiento no se 
podrá detener mediante la tecla F10 (ALTO) 
cuando se esté en una pausa. 

La primitiva PAUSA sólo se podrá utili- 
zar dentro de un procedimiento. 


— CONTINUA 

Conozcamos ahora la forma de reem- 
prender la ejecución de un procedimiento que 
se haya detenido mediante una PAUSA, 

Para esto utilizamos la primitiva: 


? CONTINUA 


Esta orden podemos también expresar- 
la de forma abreviada: 


? CO 


Al introducirla, la ejecución continuará 
justo en el punto que se haya detenido. 

Por ejemplo, si definimos el siguiente 
procedimiento: 


? PARA SUMAR :V 
> HAZ'A:¡V+1 
> ES:A 

ES 

> SUMAR :V +1 
> FIN 


y lo ejecutamos: 
? SUMAR 


si una vez pasado un pequeño espacio de 
tiempo pulsamos F5, en la pantalla aparecerá: 


0H 0 DN 


PAUSA... EN SUMAR 
SUMAR ? 


Si ahora deseamos que continúe la eje- 
cución, introducimos: 


PAUSA... EN SUMAR 
SUMAR ? CO 


y en la pantalla seguirán apareciendo los nú- 
meros: 

6 

7 


y así sucesivamente. 
Si en el procedimiento SUMAR introdu- 
cimos la orden PAUSA: 


? PARA SUMAR :V 
> HAZ 'AV+1 
> ES:A 
> ES' 

> PAUSA 
> SUMAR :V +1 
> FIN 


y lo ejecutamos: 
? SUMAR 1 
en la pantalla aparecerá: 


2 
PAUSA... EN SUMAR 
SUMAR ? 


si ordenamos que continúe: 


PAUSA... EN SUMAR 
SUMAR ? CO 


obtendremos: 


3 
PAUSA... EN SUMAR 
SUMAR ? 


y así sucesivamente. 

Se realiza una pausa cada vez que se 
escribe un número. 

La primitiva CONTINUA (CO) nunca po- 
drá utilizarse dentro de un procedimiento. 

Estas dos primitivas que hemos visto no 
existen en las versiones de Logo de los MSX 
ni del SPECTRUM. Sí las podemos encontrar 
en algunas versiones para los PC-COMPATI- 
BLES. 


2 Otras primitivas 


Para presentar textos en la pantalla he- 
mos utilizado, hasta ahora, la primitiva ESCRI- 


La primitiva PAUSA sólo puede utilizarse dentro 


de un procedimiento. 


DARA a do SN 
BE; veamos ahora otra primitiva que nos per- 
mite también presentar textos en pantalla. 


— TECLEA objeto 

Presenta en pantalla el objeto especifi- 
cado sin saltar a la línea siguiente. 

Compruébalo con los siguientes ejem- 
plos: 


? PARA El 

> TECLEA "LIBRO 

> ES'S , 
> TECLEA "CUADERNO 
> FIN 


? El 
LIBROS 
CUADERNO? 


En la pantalla aparecen juntas las pala- 
bras LIBRO y la letra $. 

La primitiva TECLEA deja el cursor po- 
sicionado al final del objeto que presenta en 
la pantalla, por eso la S aparece detrás de L1I- 
BRO, 

Con el último TECLEA del procedi- 
miento El, podemos observar que el interro- 
gante del LOGO y el cursor quedan situados 
detrás de la palabra CUADERNO, es decir, no 
ha saltado de línea. 


? PARA E2 

ES "EJERCICIOS 

TECLEA "MATEMATICAS 
TECLEA “LENGUA 

ES "FISICA 

ES "GEOMETRIA 
TECLEA "LATIN 

ES "INGLES 

FIN 


Ejecuta el procedimiento y examina con 
atención lo que aparece en la pantalla, 


? E2 

EJERCICIOS 
METAMATICAS.LENGUA. FISICA 
GEOMETRIA 

LATIN.INGLES 


VVUWVVVVVV 


Si el dato que especificamos con la pri- 
mitiva TECLEA es una lista, ésta se presenta 
sin los corchetes. 


A A A ee 


? TECLEA [LA CIUDAD] 
LA CIUDAD? 


Si queremos presentar varios objetos 
con la primitiva TECLEA, debemos poner la 
primitiva y los objetos entre paréntesis. 


(TECLEA objetol objeto2...) 
Ejemplos: 


? PARA ES 

> ESCRIBE “OBJETOS 

> (TECLEA "CASA "JARDIN [SILLA 
AZUL] "SILLON) , 
> FIN 


? ES 
OBJETOS 
CASAJARDINSILLA AZULSILLON? 


El interrogante del LOGO y el cursor 
quedan detrás del último objeto de la lista, 


? PARA E4 


> HAZ'A 40 
> (TECLEA [LA SUMA ES :] :A) ES” 
> FIN 


? E4 
LA SUMA ES :40 
? 


El interrogante del LOGO queda en la 
línea siguiente porque hemos incluido la pri- 
mitiva ES”. 


1 Cuadro resumen 


— PAUSA (PC-COMPATIBLES) 

Detiene, sin llegar a interrumpir, el pro- 
cedimiento que se está ejecutando en ese mo- 
mento. 


— CONTINUA (CO) (PC-COMPATI- 
BLES) 

Permite reemprender la ejecución de 
un procedimiento previamente detenido con 
PAUSA. 


— TECLEA objeto 

(TECLEA objetol objeto2...) 

Presenta en pantalla el objeto o los obje- 
tos especificados sin pasar a la línea siguiente. 
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Ejercicios — ? REPITE 10 [PAUSA AV 10 GD 90] 
pl 2 a“ “ ' “ 
1. Este ejercicio servirá para repasar el sig- ? TECLEA “LA “CASA “DE “JUAN 

nificado de una serie de palabras inglesas. — ? PARA Al 

En un procedimiento se especifica- > HAZ "A S0 
rán dos listas: > HAZ 'B 40 

> PONCURSOR [4 10] 

a) Una lista con las palabras en inglés que > TECLEA [EL RESULTADO DE LA 
se quieren repasar. SUMA ES :] 
b) Una lista con las correspondientes tra- > ES?A+B 
ducciones de las palabras de la lista en in- > PIN 
glés. ES 


' ño , TECLEA (“NO "ESTA [TODO)) 
En la ejecución se mostrará una pa- 


labra en inglés y se pedirá su significado 
en castellano. 

Al finalizar se informará de los 
aciertos y de los fallos a lo largo de toda la 1: 
sesión. , qe se 

2. Define los procedimientos necesarios para Primero definimos Qu procedimiento 
conseguir que las dos listas de palabras, la  P8ta guardar en la varible A Aa la variable 
lista de palabras inglesa y la lista de las res- PB. Ja lista de palabras en inglés y la lista de pa- 
pectivas traducciones al castellano, defini- J8bTas en castellano, respectivamente, 
das en el ejercicio anterior a través del pro- Nosotros realizamos este ejercicio con 
cedimiento LISTAS, puedan ser introduci- 0Ce palabras, 
das desde el teclado al iniciar cada sesión. ? PARA LISTAS 


' Solución de los ejercicios 


3. Define los procedimientos necesarios para > HAZ “A [MAN WOMAN HOUSE 
realizar el siguiente proceso: TOOTH FOOT KNIFE LADY BUS 
— Se solicitará que se introduzca una pala- GLASS BOX DISH YOUNG] 
bra que no exceda de diez caracteres. > HAZ 'B [HOMBRE MUJER RATON 
— Tras pulsar una tecla aparecerá en la DIENTE PIE CUCHILLO SEÑORA 
pantalla la palabra introducida separados AUTOBUS VASO CAJA FUENTE JO- 
sus elementos dos espacios en blanco. VEN] 
— A continuación aparecerán en la parte > FIN 
inferior de cada letra el número de orden cc pa 
que tiene cada una en el abecedario. Con el siguiente procedimiento presen- 
4. Defi AE > tamos la pantalla de trabajo: 
. Define los procedimientos necesarios para 
rellenar una zona de la pantalla con un ca- ? PARA Pl 
k rácter determinado. Para ello se solicitará > PONCURSOR [9 5] 
que se introduzca, la primera y la última co- > ES "ENGLISH 
lumna y la primera y la última fila de la > PONCURSOR [23 5] 
zona. También se solicitará el carácter con > ES “CASTELLANO 
el que queremos rellenar. > SL 
5. ¿Son correctas las siguientes órdenes? > PONPOS [-130 40] 
— ? PARA A > BL 
> ES AZAR 1000 > REPITE 2 [AV 40 GD 90 AV 260 GD 
> PAUSA 90] 
> CO > AV20GD90 
> A > GI9 AV 20 RE 40 
> FIN > FIN 


Fig. 1. 


En P2 se obtiene, aleatoriamente, la pa- 
labra (de la lista de inglés) a preguntar, se 
muestra en la pantalla y se pregunta su signi- 
ficado en castellano. 


? PARA P2 

HAZ "I AZAR 13 
SI:I=0[([HAZ 1 11] 

HAZ "E ELEMENTO 1 :A 
HAZ '"C ELEMENTO :l :B 
PONCURSOR [8 7] 

ESFE 

PONCURSOR [4 2] 

ES [INTRODUCE LA PALABRA EN 
ESPANOL] 
PONCURSOR [23 7] 
HAZ "P LL 

FIN 


En P3 se comprueba si la traducción es 
correcta o no. 

Si es correcta, se incrementa en 1 la va- 
riable que controla los aciertos y se escribe en 
la pantalla la palabra CORRECTO. 

Si no es correcta, se incrementa en 1 la 
variable que controla los fallos, se escribe en 
la pantalla la palabra INCORRECTO y la res- 
puesta correcta. 


? PARA P3 

> HAZ “C LISTA :C 

> PONCURSOR [10 10] 

> SI :P =::C [HAZ “N :N + 1 ES 
"CORRECTO] 
[HAZ 'M :M + 1 ES "INCORRECTO 


VVWV VVVVVVVV 


PONCURSOR [2 12] 
TECLEA [LA PALABRA CORRECTA 
ES :] ES :C] 

> FIN 


Para preguntar si se desea otra palabra, 
definimos el procedimiento P4. 

Si la contestación es (S), se ejecuta el 
procedimiento TO; si no, se retorna al proce- 
dimiento principal. 


? PARA P4 

> PONCURSOR [10 18] 

> ES [¿OTRO PALABRA? (S/N)] 
> HAZ "TLC 

> SIT ="S [TO] 

> SI:T ='"N [ALTO] 

> FIN 


El procedimiento TO realiza las llama- 
das a los procedimientos detallados hasta aho- 
ra. 

? PARA TO 

> BP 

> ¿BT 

> Pl 

20D 

5 P8 

> P4 

> FIN 


FINAL se ejecuta cuando ya no se de- 
sean traducir más palabras, es con este pro- 
cedimiento con el que se presenta el número 
de aciertos y número de fallos. 


? PARA FINAL 

BP 

BT 

PONCURSOR [6 3] 

ES [RESUMEN SESION IDIOMAS] 
PONCURSOR [8 7] 

ES "ACIERTOS 

PONCURSOR [20 7] 

ES "FALLOS 

PONCURSOR [10 9] 

ES :N 

PONCURSOR [22 9] 

ES :M 

PONCURSOR [8 14] 

TECLEA [TOTAL INTENTOS :] 
ES :M+:N 

PONCURSOR [10 19] 

ES [PULSA UNA TECLA] 


VVWVVVVVWVWVVVVVVVVV 
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> HAZ "TT LC 
> FIN 


Y finalmente, TODO es el procedimien- 
to principal, el que utilizamos para poner en 
marcha a todos los demás. 


? PARA TODO 
BP 

BT 

oT 

HAZ "NO 
HAZ "M0 
LISTAS 

TO 

FINAL 

FIN 


Cuando quieras empezar a probar qué 
tal está tu inglés, teclea: 


? TODO, 


VVVVVVVVV 


En este nuevo ejercicio no aparece el 
procedimiento LISTAS y se incluyen los si- 
guientes procedimientos: 

El primer procedimiento que incluimos 
es DATOS. 

Presenta la pantalla para introducir la 
lista de palabras inglesas y la lista de las res- 
pectivas traducciones al castellano. 


? PARA DATOS 

HAZ "A [] 

HAZ B [| 
PONCURSOR [5 3] 
ES "ENGLISH 
PONCURSOR [20 3] 
ES "CASTELLANO 
HAZ "Y 5 

FIN 


Con el segundo procedimiento que in- 
cluimos realizamos la lectura del teclado de 
las dos listas de palabras. 

Para dejar de introducir datos pulsare- 
mos RETURN en vez de la palabra en inglés y 
de la palabra en castellano. 


? PARA DAT 
> HAL “Y ¿dit 1 


VVWVVVVVV 


> PONCURSOR LISTA 5 :Y 

> HAZ 'Dl LL 

> PONCURSOR LISTA 20 :Y 

> HAZ D2 LL 

> SI Y :Dl =[]:D2 = [] [ALTO] 
[HAZ “A FRASE :A :Dl 
HAZ 'B FRASE B :D2 HAZ “Z :Z + 1 
DAT] 

> FIN 


En el procedimiento TODO incluimos la 
inicialización de la variable Z que controlará 
el total de palabras introducidas, y la llamada 
a los procedimientos DATOS y DAT. 


? PARA TODO 
BP 


HAZ "NO 
HAZ "M0 
DATOS 
HAZ "Z 0 
DAT 

TO 
FINAL 
FIN 


VVVWVWVVVVVVV 


En el procedimiento P2 cambiamos la 
constante 12 por la variable Z que guarda el to- 
tal de palabras a gestionar. 


? PARA P2 

HAZ "I AZAR :Z +1 

SI: =0[HAZ 1 :Z - 1] 
HAZ "E ELEMENTO 1 :A 
HAZ "C ELEMENTO :I :B 
PONCURSOR [8 7] 

ESB 

PONCURSOR [4 2] 

ES [INTRODUCE LA PALABRA EN 
ESPANOL] 
PONCURSOR [23 7] 
HAZ "P LL 

FIN 


VVV VVVVVVVV 


Veamos un ejemplo de creacion de las 
dos listas: 


? TODO 


Una vez aparezca la siguiente pantalla: 


El Logo dispone de varias primitivas para 
presentar texto en la pantalla. 


Fig. 2. 


Empezaremos a introducir palabras. 


ENGLISHCASTELLANO 
DESK ESCRITORIO 
THIEF” LADRON 

GUN — PISTOLA 


HORSE CABALLO 
TICKET BILLETE 
LAWN CESPED 


Hemos creado las dos listas necesarias 
para continuar con el ejercicio. 

En nuestros dos ejemplos hemos utiliza- 
do palabras en inglés, pero podemos escoger 
para trabajar cualquier otro idioma. 


En primer lugar, asignamos a la varia- 
ble ABC el abecedario completo mediante el 
procedimiento Pl: 


? PARA Pl 

> HAZ "ABC[A B 
GHIJKLMN 
OQORSTUVXYZ 

> FIN 


P2 y P3 son los que se encargan de so- 
licitar una palabra y de comprobar que ésta 
no excede de 10 caracteres, así como de com- 
probar que al menos contiene un elemento: 


? PARA P2 
> PONCURSOR [2 5] 


CD 


o 


La primitiva 


Y BUY 
PAPA 


== 


A A y PRA TS A A E E 
TS Ñ Ñ Pl AAN ATA E ANDA A y 
LEA ñ e A ES AS A $ £r Js: JU Ad: SAN 


TELAS DAA 


y73 dE, PO A 
TECLEA puede tenez 


11 


AS pS 


> ES [INTRODUCE UNA PALABRA] 
> FIN 


? PARA P3 
PONCURSOR [5 10] 
PONCT FONDO 


PONCT 7 


PONCURSOR [5 10] 

HAZ "P LL 

SI :P = [] [P3] 

HAZ "P ULTIPO :P 

HAZ "C CUENTA :P 

SI:C > 10 [P3] 

FIN 

Una vez que tenemos la palabra, la es- 


cribimos, separando sus elementos dos espa- 
cios en blanco: 


VVVWVWVWVVVVVVVV 


? PARA P4 

> HAZ "CU ENTERO (38 - :C* 3) /2 
> HAZ'"W 1 

> HAZ 'N 1 

> REPITE :C [PONCURSOR LISTA :CU 


+ :W 10 ES ELEMENTO :¡N ¡P HAZ 'N 
¡N +1 HAZ “W :W + 3] 

HAZ "11 

HAZ "1 1 

HAZ "MI 1 

P5 

FIN 


Al final de este procedimiento se inicia- 
lizan tres variables y se hace una llamada al 
procedimiento P5. 


? PARA P5 

> SIM > :C [ALTO] 

> HAZ "V ELEMENTO III :P 

> SI:V = ELEMENTO :1I :ABC 
[PONCURSOR LISTA :CU +: 11 
ES 1 HAZ”: +3 
hAZ "1 1 HAZ “MM 111 + 1 P5] 
[HAZ TI 1 + 1 P5] 

> FIN 


P5 es el que se encarga de ir compa- 
rando los elementos de la palabra introducida 
con la lista del abecedario. En el momento que 
coinciden, se escribe el número del elemento 
del abecedario que se está consultando deba- 
jo del elemento correspondiente de la pala- 
bra: 


VVVvVV 


? PARA TECLA 
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> PONCURSOR [14 22] 

> ES [PULSA UNA TECLA] 
> HAZ "TLC 

> BP 

> BT 

> FIN 


TECLA es el que nos pasa de pantalla 
una vez pulsada una tecla. 

Por último, definimos TO para iniciali- 
zar el proceso y englobar a todos: 


? PARA TO 

BP 

BT 

OT 

Pl Fig. 4. 

P2 p 

P3 : 

TECLA El procedimiento A es el que se encar- 
P4 ga de pedir que se introduzcan los diferentes 
FIN datos que se requieren: 


? PARA A 

PONCURSOR [2 2] 

ES [PRIMERA COLUMNA] 
PONCURSOR [19 2] 

HAZ "PC LL 

HAZ "PC UL :PC 
PONCURSOR [2 4] 

ES [ULTIMA COLUMNA] 
PONCURSOR [18 4] 

HAZ "UC LL 

HAZ "UC UL :UC 
PONCURSOR [2 6] 

ES [PRIMERA FILA] 
PONCURSOR [16 6] 

HAZ "PF LL 

HAZ "PF UL :PF 
PONCURSOR [2 8] 

ES [ULTIMA FILA] 
PONCURSOR [15 8] 

HAZ "UF LL 

HAZ "UF LL :UF 
PONCURSOR [2 10] 

ES [CARACTER DÉ RELLENO] 
PONCURSOR [23 10] 
HAZ "CR LL 

HAZ "CR UL :CR 

FIN 


VVVWVWVVVVV 


Si lo ejecutamos: 
IRNO) 


una vez que introduzcamos una palabra, en la 
pantalla aparecerá: 


Fig. 3. 


Después de pulsar una tecla tendre- 
mos: 


VVWVWVWVWVWVWVWVVVVVVVVVVVVVVVVVV 
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Una vez que tenemos todos los datos y 
después de haber pulsado una tecla, se ejecu- 
ta el procedimiento B, que es el que calcula la 
zona de la pantalla que hay que rellenar y la 
rellena: 


? PARA B 

> HAZ “10 

> HAZ "IO 

> REPITE (UF - :PF) + 1 
[REPITE (UC - :PC) + 1 
[PONCURSOR LISTA :PC +1 
¡PF + II ES :CR HAZ 1 
1 + 1] HAZ 10 HAZ “II 
+ 1] 

> FIN 


TECLA es el que se encarga de borrar 
la pantalla una vez que se haya pulsado una te- 
cla. 


? PARA TECLA 

> PONCURSOR [14 22] 
> ES [PULSA UNA TECLA] 
> HAZ "TLC 
> BP 

> BD 

> FIN 


En TO englobamos todos los procedi- 
mientos definidos e inicializamos el proceso: 


Para ejecutarlo, bastará con introducir: 
? TO 


— ?PARAA 
> ES AZAR 1000 


> PAUSA 
> CO 
> 

> FIN 


INCORRECTO, 


La primitiva CO no puede ir nunca den- 
tro de un procedimiento: 


— ? PARAB 


> REPITE 10 [PAUSA AV 10 GD 90] 
> FIN 


CORRECTO 


Nada más comenzar a ejecutarse el pro- 
cedimiento habrá una pausa deteniéndose la 
ejecución: 

— ? TECLEA “LA "CASA “DE "JUAN 


INCORRECTO 


Cuando la primitiva TECLEA tiene más 
de un dato, se debe poner todo entre parénte- 
sis. 

— ? PARA Al 

> HAZ'A 30 

> HAZ 'B 40 

> PONCURSOR [4 10] 

> TECLEA [EL RESULTADO DE LA 
SUMA ES :] 

> ES:A +:B 

> FIN 


CORRECTO 


En la pantalla, cuando ejecutemos Al, 
aparecerá: 


EL RESULTADO DE LA SUMA ES :70 
_- —= ? TECLEA (NO "ESTA [TODO)) 


INCORRECTO 


La primitiva TECLEA también debe ir 
dentro de los paréntesis. 


13 


MANEJO DE SPRITES Y ELEMENTOS GRAFICOS 


O podemos decir que un 
juego es bueno si no lleva un 
componente musical que 
nos lo haga más agradable. 
Controlar el sonido de nues- 
tro ordenador no es nada di- 
fícil y podemos hacer que 
nuestro programa gane en 


calidad. 

Ante todo, decir que hace falta conocer 
muy pocas cosas sobre la música, aunque al- 
guna que otra siempre es necesaria. En el caso 
del AMSTRAD es importante entender una se- 
rie de conceptos, mientras que el SPECTRUM 
es el ordenador que más fácil resulta de pro- 
gramar. Por ello, empezaremos por explicar 
qué es un pentagrama y qué es la escala musi- 
cal. 


2 Música en nuestro ordenador 


Los compositores, al componer su músi- 
ca, se valen de unos grafos o signos específi- 
cos. Estos signos aparecen escritos sobre lo 
que se llama pentagrama. El pentagrama se 
compone de cinco líneas horizontales y rectas, 
tal y como aparece en la figura 1. 


Fig. 1. 
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Los diferentes tonos aparecen en el 
pentagrama mediante unos círculos, que pue- 
den tener un rabito o no. A estos signos se les 
denomina notas. Según donde coloquemos uno 
de estos círculos o notas en el pentagrama, re- 
presentará un sonido u otro. En la figura 2 po- 
demos ver qué notas hay y dónde hay que co- 
locarlas. 


Fig. 2. 


Según vemos en la figura, dichas notas 
son las que todos conocemos (DO, RE, MI, 
FA...), pero encima de cada una de ellas apa- 


rece una letra (C, D, E, F...), estas letras corres- 


ponden a la notación internacional que pode- 
mos usar en cualquier país. Esto es debido a 
que, mientras nosotros a la nota G la llamamos 
SOL, los indios (de la India) no tienen por qué 
llamarla igual. 

Si queremos representar una nota muy 
alta o muy baja y no nos cabe dentro de las lí- 
neas del pentagrama, lo que podemos hacer 
es dibujar unos pequeños ejes encima o deba- 
jo del pentagrama para indicar la nota que 
queremos representar. Esto se puede enten- 
der mejor si nos fijamos en la figura 3. 

Como las notas se caracterizan no sólo 
por la frecuencia que representan según el lu- 


A O A 


Fig. 3. 
gar que ocupen, sino por la duración del soni- 
do, tenemos que encontrar una forma de re- 
presentar la duración del sonido. En la figura 


4 podemos ver cómo se representan las notas 
según su duración y el valor que tienen. 


REDONDA 
BLANCA 


NEGRA 


CORCHEA 


SEMICORCHEA 


FUSA 


SEMIFUSA 


Fig. 4. 


La primera nota que vemos en la tabla 
(REDONDA) tiene duración 1. Esto no signifi- 
ca nada en sí mismo, pues si variamos lo que 
se llama el TEMPO de la melodía, dicha uni- 
dad puede darnos una nota más larga o más 
corta. Por ello, los números que aparecen a la 
derecha de la tabla nos indican la relación que 
hay en la duración entre unas notas y otras. 

Ya que hemos comentado algo sobre el 
TEMPO, hay que decir que éste aparece, nor- 
malmente, al principio de la partitura que es- 
tamos leyendo. Normalmente la forma de dar 
el tempo es mediante palabras italianas que 
nos expresan, de una forma muy colorista, 


sd 
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TORA 


cómo hay que tocar o leer la partitura. Así, nos 
encontramos con ritmos como LARGO, AN- 
DANTE o VIVO. A continuación damos una ta- 
bla con los tipos y su significado. Hay que de- 
cir que cada lector de partituras interpreta el 
TEMPO como más le conviene, siempre den- 
tro de unos límites. 


LARGO Muy despacio 
LENTO Muy despacio 
ADAGIO Despacio 
ANDANTE Tranquilo 
ALLEGRO De prisa 
VIVACE Muy de prisa 
VIVO Muy de prisa 


Otra cosa a tener en cuenta son los si- 
lencios. No todo en una partitura son sonidos. 
También hay signos que nos indican que te- 
nemos que dejar de tocar. Por supuesto, di- 
chos silencios pueden ser o más o menos lar- 
gos. La medida que se utiliza es la misma que 


Silencio de redonda 
nu. Silencio de blanca 


ze g ia EN Silencio de negra 


Silencio de corchea 


Silencio de semicorchea 


> hí > " > 
rs : £ Silencio de fusa 


Silencio de semifusa 


Fig. 5. 
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para las notas y la forma de escribirlos, en 
ciertos casos, nos recuerda a la nota que tie- 
ne, sonando, la misma duración. La figura 5 
nos muestra una tabla con todos los silencios 
y su duración. 


Aunque no hemos dicho todo lo que se 
puede decir sobre música, lo que acabamos 
de ver nos puede servir para entrar en este 
apasionante mundo. Iremos viendo cómo pro- 
ducir música en los distintos ordenadores y 
empezaremos por el SPECTRUM. 


' El sonido en el SPECTRUM 


En el SPECTRUM sólo disponemos de 
una voz para producir sonidos. Aunque hay 
programas comerciales que, al estar escritos 
en código máquina, al producir música nos da 
la impresión de que este ordenador tuviese 
dos o más canales, nosotros, desde el BASIC, 
sólo tenemos un canal. 


La instrucción que nos permite produ- 
cir sonidos es el comando BEEP. BEEP va se- 
guido de dos parámetros. El primero nos indi- 
ca la duración de la nota que vamos a oír y el 
segundo la nota en cuestión 


BEPP duración,nota 


La duración ha de ir en segundos, pero 
podemos poner números decimales para re- 
presentar tiempos menores de un segundo. 

La nota ha de ser un número entre -59 
y 69 que da la nota a emitir. También se pue- 
den poner decimales para obtener cuartos y 
octavos de tono. 


Como en el SPECTRUM las notas no se 
dictan con su nombre ni con la letra que inter- 
nacionalmente .se le asigna, vamos a ver una 
figura en la cual vemos la relación entre el nú- 
mero de nota y su nombre. 


Fig. 6. 


Para ver mejor cómo funcionan los dos 
parámetros de la sentencia BEEP, aparecen 
los siguientes programas: 


100 REM ARAS OOOO Jl lolo loolojOK 
110 REM *DURACIOÓN DE LAS NOTAS EN EL SPECTRUM * 
120 REM Axa olaa OO oalalalalalolalaialolaloIOOK 
130 REM 

140 FOR I=0 TO 2 STEP .1 
150 BEEP 1, 1 

160 NEXT 1 

170 LET D=.01 

180 FOR I=1 TO 10 

190 PRINT AT 11,4; 
200 PRINT "DURACION: 
210 BEEP D,0 

220 PAUSE 25 

230 LET D=Dx*2 

240 NEXT 1 

250 STOP 


' 


"5D; ". SEGUNDOS 


100 REM SSA 
110 REM * GAMA DE TONOS EN EL SPECTRUM * 
120. REM AMOS lalola llok ak 
130 REM 

140 FOR I=-59 TO 69 

150 PRINT AT 11,11; 
160 PRINT "TONO: ";1;" 
170 PAUSE 25 

180 NEXT 1 

190 STOP 


":BEEP.1,L. 


Como en este ordenador es muy senci- 
llo componer y tocar música, a continuación 
aparecen un par de programas que nos inter- 
pretan dos conocidas canciones. 


100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 


REM oO ISO aloja jo RaJoK 
REM * ADESTE FIDELES PARA SPECTRUM * 
REM ASAS OIOlOROK 
REM 
PRINT AT 8,9;“ADESTE FIDELES" 
PRINT AT 11,11;"VILLANCICO" 
DIM F(8) 
DIM N$(8,3) 
FOR I=1 TO 8 
READ F(1) 
READ N$(1) 
NEXT 1 
REM 
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230 REM **x* LINEAS DATA CON EL NUMERO DE NOTA Y SU NOMBRE x*xkxk 
240 REM 


250 DATA 2,"RE" 

260 DATA  4,"MI" 

270 DATA 6,"FAR" 
280 DATA 7,'SOL” 
290 DATA 9,"LA" 

300 DATA 11,"SI" 

310 DATA 12,"DO" 

320 DATA 14,"RE" 

330 REM 

340 REM *xx* LEER LAS DATAS CON LA MUSICA Y TOCAR CANCION xxx 
350 REM 

360 RESTORE 470 

370 FOR I=1 TO 61 

380 READ D 

390 READ N 

400 PRINT AT 15,11;N$(N);" 

410 BEEP D,N 

420 NEXT 1 

430 GOTO 330 

440 REM 


450 REM **x* LINEAS DATAS CON LA CANCION A TOCAR Xxx 
460 REM 


470 DATA 0,5,4,1,4,0.5,1,0.5,4 

480 DATA 1,5,1,1,0.5,6,0,5,5,0.5,6,0.5,7 

490 DATA 1,6,0.5,5,0.5,4,1,4,0.5,3,0.5,2 

500 DATA 0,5,3,0.5,4,0.5,5,0.5,6,1,3,0.75,2,0.25,1 
510 DATA 2,1,1,8,0.5,7,0.5,6 

520 DATA 1,7,1,6,0,5,5,0.5,6,0.5,4,0.5,5 

530 DATA 1,3,0.5,1,0.5,4,0.5,4,0.5,3,0.5,4,0.5,5 
540 DATA 1,4,0.5,1,0.5,6,0.5,6,0.5,5,0.5,6,0.5,7 
550 DATA 1,6,0.5,5,0.5,6,0.5,7,0.5,6,0.5,5,0.5,4 
560 DATA 1,3,0.5,4,0.5,7,1,8,0.75,5,0.25,4,1,4 


100 REM aaa OSOS lalalala OOOO lolo ok 
110 REM * PARA ELISA VERSION SPECTRUM : 
120 REM. aloja llalallok lok 
130 REM 

140 CLS 

150 PRINT AT 9,11;"PARA ELISA" 

160 PRINT AT 13,11; "BEETHOVEN" 

170 FOR I=1 TO 58 

180 READ A,B 

190 BEEP A,B 

200 NEXT 1 


210 DATA .2,17,.2,16 

22 DODALA odil deis dB 2 ode za dla 1 
230 DATA .6,10,.2,1,.2,5,.2,10 

240 DATA .6,12,.2,5,.2,9,.2,12 

250 DATA .6,13,.2,5,.2,17,.2,18 

¿BONDATA ZALLA EU 13 
270. DATA .6,10,.2,1,.2,5,.2,10 

280 DATA .6,12,.2,5,.2,13,.2,12 


290 DATA .6,10 

300 DATA .2,12,.2,13,.2,15 

310 DATA .6,17,.2,8,.2,18,.2,17 
320 DATA .6,15,.2,6,.2,17,.2,15 
330 DATA .6,13,.2,5,.2,15,.2,13 
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340 
350 
360 
370 
980 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
870 
680 
690 
700 
710 
720 
730 
740 
750 
+ 760 
770 
780 
790 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 


DATA .68,12,.2,5,.6,17 
DATA .2,17,.6,29,.2,16 
DATA .6,17,.2,16 
RESTORE 210 
FOR I=1 TO 35 
READ A,B 
BEEP A,B 
NEXT 1 
RESTORE 470 
FOR I=1 TO 102 
READ A, B 
BEEP A,B 
NEXT 1 
DATA .2,13,.2,13, 
DATA .8,13,.3,18,.1,17 
DATA .4,17,.4,15,.3,23, 
DATA .2,22,.2,20,.2,18, 
DATA .4,11,.4,10,. 
DATA .8,13,.2,15,.2,18 
DATA .6,17,.2,17,.2,18, 
DATA .8,13,.3,15,.1,12 
DATA .1,13,.1,20,. 
DATA .1,17,.1,20, 
DATA .1,13,.1,20, 
DATA .1,17,.1,20, 
DATA .1,17, 
DATA .6,17,. 
DATA .8,17, 
DATA .2,18, 
RESTORE 220 
FOR I=1 TO 56 
READ A,B 
BEEP A,B 
NEXT 1 
RESTORE 
FOR I=1 
READ 
BEEP 
NEXT 1 
RESTORE 
FOR I=1 
READ 
BEEP 
NEXT 1 
DATA 1.2,10,1.2,14 
DATA .8,15,.2,17,.2,18 
DATA .8,18,.4,18 % 
DATA 1.2,17 
DATA .8,15,.2,13,..2,12 
DATA .8,10,.4,10 
DATA .4,10,.4,13,.4,12 
DATA 1.2,10,1.2,14 
DATA .8,15,.2,17,.2,18 
DATA .8,18,.4,18 
DATA 1.2, 18 
DATA .8,16,.2,15,,2,13 
DATA .8,11,.4,10 
DATA .8,9,.4,9 
DATA 1.2,10,1.2, 12 
DATA 
DATA 


.2,13 


¿1,22 


1, 10; : 


.2,10 


¿Lo 2 1 


1,18,. 
CASPIAN 
E 15 
LITE: 


YN TG UIAG 
6,17 
2,16 


18 


d:524 01,285 


2,17 ,002,15,102513 
1,8,.1,10,.1,11 


O dB ro lts 


.133,29,. 


1,8,..1,20,.1,10,,1,20/.1,12,..1,20,, 1,13,.1,20,:1,15;.1,20 
Lo leo rd db 
.1,8,.1,20,.1,10,.1,20,.1,12,.1,20,,1,18,.1,20,.1,15,.1,20 
.1,25,.1,24,.1,22,,1,20,.1,18,.1,17,.1,15,.1,20,.1,18,.1,15 
1 DA ANA ZA LTL LO, Rda 17: 0,16 


.133,-2,.1833,1,.133,5,.133,10,.133,13,.138,17,.133,15,.133,13,.133,12 
0 e o o be o ho at lo e a a ia Lt 


133,27,.133,25,.133,24 


950. DATA .133,22,.133,25,.133,29,.133,34,.133,37,.133,41,.133,39,.133,37,.133,36 
960 DATA .133,35,.133,34,.133,33,.133,32,.133,31,.133,30,.133,29,.133,28,. 133,27 
970 DATA .133,26,.133,25,.133,24,.133,23,.133,22,.133,21,.133,20,:133,19,.133,18 


980 RESTORE 220 
990 FOR I=1 TO 56 


1000 READ A,B 
1010 BEEP A,B 
1020 NEXT I 


1030 RESTORE 210 
1040 FOR I=1 TO 35 
1050 READ A,B 
1060 BEEP A,B 
1070 NEXT 1 

1080 STOP 


El sonido en el AMSTRAD 


El AMSTRAD nos permite realizar soni- 
dos y melodías más complicadas que el SPEC- 
TRUM., Para ello disponemos de la instrucción 
SOUND. Esta instrucción puede ir seguida 
hasta de siete parámetros, de los cuales sólo 
los dos primeros son imprescindibles. 


SOUND C,T,D,V,EV,ET,R 
donde: 

C = Le dice al ordenador qué canal de 
sonido queremos utilizar. El AMSTRAD dispo- 
ne de tres canales distintos. 

T = Es el período de tono o, lo que es 
igual, la nota que queremos tocar. 

D = Especifica la duración del sonido 
en centésimas de segundo (100 = 1 segundo). 

V = Es el volumen, ya veremos más 
adelante qué es esto. 

EV = Es la envolvente del volumen. Nos 
permitirá variar el sonido de la nota mientras 
se está tocando. 

ET = Es la envolvente del tono. Nos per- 
mitirá variarlo mientras está sonando. 

R = Es el período del ruido. Esto sirve 
para la generación de ruido blanco. Con este 
ruido podemos simular desde el choque de 
dos marcianos hasta el ruido de un tren. 

Hagamos un estudio más detallado de 
cada uno de estos parámetros. 


Parámetro C 


Ya hemos dicho que tenemos tres cana- 
les distintos de música. Los podremos nom- 
brar como A, B y C. Según el valor que asig- 
nemos al parámetro C, podremos hacer que 
suene uno u otro, incluso que suenen dos o 
más a la vez. Los números que representa a 
cada canal son los siguientes: 


Canal A = 1 
Canal B = 2 
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Canal C =4 
Sincronizar con A = 8 
Sincronizar con B = 16 
Sincronizar con C = 32 
Retener = 64 

Borrar cola = 128 


Si queremos tocar alguna nota con el 
canal A, tendremos que hacerlo con C = 1; si 
fuese con el canal B, entonces C = 2. Si que- 
remos tocar con el canal A mientras está so- 
nando el C y queremos sincronizar ambos ca- 
nales, entonces tendremos que poner C =8 + 
4, El ocho (8) significa que queremos que sue- 
ne el canal A, con la nota que se da a conti- 
nuación y que queremos que el sonido quede 
sincronizado con el canal C, cuya nota dimos 
anteriormente. 

Si C tiene valor 64, entonces retenemos 
el sonido durante el tiempo que queremos. 
Esto significa que dejará de sonar durante un 
cierto tiempo. Para que el sonido continúe, 
tendremos que poner: 


RELEASE C 


donde C es el canal o canales que queremos 
liberar. C puede tener un valor entre 1 y 7. 


1 = Canal A 
2 = Canal B 
3 = Canales A y B 
4 = Canal C 


5 = Canales A y C 
6 = Canales B y C 
7 = Canales A,B y C 


Si el valor de C contiene a 128, enton- 
ces se borra toda la cola de música "ue hu- 
biese retenida. 


El parámetro T 


Como dijimos, este varámetro le dice al 
ordenador qué nota tiene que tocar. Para ello 
podemos poner un número entre 0 (agudo) y 
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NOTA FRECUENCIA PERIODO ERROR RELATIVO FRECUENCIA PERIODO ERROR RELATIVO 


Ñ -B.087% 

E ' A Ei +0.007% y 523.251 239 +0.246% 
36.708 3405 -D.DU7% 354.365 225 -8,215% 
30,091 3214 -9,009% 597,339 213 +8.881% 
41,203 3034 +9.909% 622.254 291 +9.058% 
43.454 2863 -0.816% 659.255 198 +9, 206% 
46.249 2793 +9.009% Octava -3 698.457 179 +9.819% 
48.999 2551 -8.902% 739.989 169 +9.046% Octava 1 
51.913 2498 +0. 905% qa ja Hs Bco 
55.000 2273 +9.912% 4d * 
58.270 2145 -9. 908% 888. 999 142 -8.032% 


932.328 134 -8.055% 
61.735 2025 +9,811% 987.767 12> +8. 354% 


FRECUENCIA PERIODO ERROR RELATIVO N FRECUENCIA PERIODO ERROR RELATIVO 


65.406 1911 -9. 807% 1646.592 119 0.3744 
69,296 1894 19, 9807% 1195.731 413 +9,227% 
73.416 1793 +0.022% 1179,659 -8.390% 
77.782 1697 -9.099% 1244.08 -9,441% 
82.497 1517 +9, 099% 1318.519 +0. 206% 
87,397 1432 +9.919% F 1396,917 -9.543% 
92.499 1351 -0. 028% Octava -2 14779.7789 q -9,549% Octava 2 
97.999 1276 +9.037% 1567.982 +0. 350% 
193.826 1294 +9. 005% 1661,219 -8, 328% 
119.008 1136 -B. 932% 17640.099 -8,932% 
116.541 1073 +0. 039% 1964.655 -BD.B55% 
123.471 1912 -4. 038% 1975.533 -8.435% 


NOTA FRECUENCIA PERIODO ERROR RELATIVO NOTA FRECUENCIA PERIODO ERROR RELATIVO 


2093.084 +9, 462% 
2217,461 -D.662% 
2349,318 -9. 399% 
146.832 851 -0.037% O, -8,441% 
155.564 804  +9.958% 
: 2637.021 -8.855% 
164.814 758 -2.957% 2793. 826 +9.574% 
174.614 716  +*9.819% 2959.955 -8.548% Octava 3 
184.997 676 +8.8946% Octava -1 3135.963 +9, 450% 
195,998 638 — +8.837% 3322. 438 +9.992% 
207.652 682 +9.905% 3528. 09% +1.357% 
229.000 568  -D.832% 3729.310 +1.417% 
233.982 536 -8,955% 3951.966 +1.134% 
246.942 506 -9.938% 


139.815 956 +0.046% 
138.591 902 *8.007% 


NOTA FRECUENCIA PERIODO ERROR RELATIVO FRECUENCIA PERIODO ERROR RELATIVO 
e 261.626 478 +9.046% DO media 
cA 277.183 451 +9.007% 4934.922 -D.662% 

293.665 1426 +0,981% 4698.636 +1.469% 

311.127 492 +0.058% 4978.932 -9.441% 

329.628 379 -8,957% 5274.941 +1.246% 

349.228 358 +8.817% 5587.652 -1.685% 

369,994 338 +8,046% Octava Y 5919,911 -9,548% Octava 4 

391.995 319 +8.037% 6271.927 +0.350% 

415.305 3g1 +9.905% 6644.875 +89. 792% 

449,000 284 -0,932% LA internacional 7049.009 +1.357% 

466.164 268 -9.955% 7458.621 +1.417% 

493.883 253 -g. 038% 7902.133 +1.139% 


4186.909 +9.462% 


100 REM RAMSAR lola jojololololalÓK 300 DATA 338, "FAR" 
110 REM * ESCALA CROMATICA EN EL AMSTRAD * 310 DATA 319, "SOL" 
SN 190 REM ARMAS IVIOIolOJOR 320 DATA 301, "SOL+" 
130 REM 330 DATA 284, “LA” 
140 CLS 340 DATA 268, "LA+H" 
150 FOR I=1 TO 12 350 DATA 253, "SI" 


160 READ T 


E A os AE 4095 (grave). En la figura 7 podemos ver las 


OL CO NeAnn 13048 notas, la frecuencia de cada nota y el período 
190  PRINT NS" " o número que tenemos que poner para repro- 
200 SOUND 1,7 ducir dicha nota. 

210 FOR J=1 TO 500 También podemos ver en la figura 7 el 
220. NEXT J error relativo que se produce al dar una nota 
230 NEXT 1 con respecto a la nota real. Normalmente, al 


240 DATA 478,"DO" 
250 DATA 451, "DO+*" 
260 DATA 426, "RE" 


ser muy pequeño el error, el oído humano no 
puede captar la diferencia. 


270 DATA 402, "RES" El parámetro D 
290 DATA 379,"MI" pde > 
290 DATA 358, “FA" Nos indica la duración del sonido en 


centésimas de segundo. Puede tener un valor 


20 


entre -32768 y 32767. Si dicho valor es igual a 
cero (0), entonces la duración del sonido irá 
controlada por la envolvente. Si es menor que 


100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 


El parámetro V 
Nos permite 


" 


cero (>0), entonces le dice al ordenador el 
número de veces que se repite la envolvente. 
Normalmente tiene un valor implícito de 20. 


REM ASS IO OIDO RIOROROJoROOK 


REM * ESCALA Y DURACIONES EN EL AMSTRAD * 
REM ARSS OOO ROI 


REM 
CLS 
LET D=2 
FOR I=1 TO 8 
READ T 
READ N$ 
LOCATE 16,10 
PRINT "NOTA: ";N$;"” 
LOCATE 10, 16 


PRINT "DURACION ";D/100;" SEGUNDOS ye 


SOUND 1,T,D 
LET D=Dx*2 
FOR J=1 TO 500 
NEXT J 
NEXT 1 
DATA 478, "DO" 
DATA 426, "RE" 
DATA 379, "MI" 
DATA 358, "FA" 
DATA 319, "SOL" 
DATA 284, "LA” 
DATA 253, "SI" 
DATA 239, "DO" 


dar un volumen distinto a 


cada sonido que produzcamos. Puede tomar 


100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 


valores entre 0 y 15, siendo 0 el mínimo y 15 
el máximo. Si no se especifica ningún valor, el 
ordenador lo toma como volumen 12. 


REM SSA loloIIoIK 
REM * ESCALAS Y VOLUMEN EN EL AMSTRAD x 
REM SISI OOOO lok 


REM 

CLS 

FOR I=1 TO 15 STEP 2 
GOSUB 220 

NEXT 1 

FOR I=15 TO 1 STEP -2 
GOSUB 220 

NEXT 1 

END 

REM 

REM *X*x* RUTINA DE SOUND xxx 

REM 

READ T 

READ N$ 

LOCATE 16,10 

PRINT "NOTA: "¿N$;"  " 

LOCATE 16,16 

PRINT "VOLUMEN: “;I;" 

SOUND 1,T,50, 1 

FOR J=1 TO 500 
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NEXT J 
RETURN 
REM 


330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 


REM 

DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


239, “DO",213, "RE" 
190, “MI",179, "FA" 
159,'"SOL",142, "LA" 
127,"S1",119,"“DO" 
119,"DO",127,"SI" 
142, "LA", 159, "SOL" 
179,"FA", 190, “MI” 
213, "RE", 239, "DO" 


El parámetro EV 


Con este parámetro le decimos al orde- 
nador que queremos utilizar la envolvente de 
volumen EV. EV deberá ser un número entre 
1 y 15 y, antes de incluir este parámetro tene- 
mos que haber definido la envolvente a utili- 
zar. 

Para definir una envolvente utilizare- 
mos la instrucción ENV, cuya sintaxis es: 


ENV N,El,A1,D1,E2,42,D2,E3,A3, 

D3,E4,44,D4,E5,A5,D5 
donde: 

N = Es el número de envolvente que es- 
tamos definiendo y que es el número de refe- 
tencia que utilizaremos en la sentencia 
SOUND, 

En = Indica el número de escalones en 
cada sección del sonido. Una sección es una 


Sección 2 
Sección 3 
Sección 4 


cí 
[= 

9 
o 
o 
o 

(9) 


40 


30 


20 


...m.no.s 


AO 
rrronrrncarcccanosonsanss. 


aro nsorsasoos.. 
. 


segundos 1 


REM *** LINEAS DE DATA *x*x 


parte del sonido donde éste disminuye o au- 
menta. Como tenemos desde El hasta ES, esto 
significa que podemos tener hasta 5 secciones 
distintas. Según esto, este parámetro le indica 
al ordenador cuántas etapas de volumen que- 
remos que evolucione la nota antes de con- 
cluir. Puede tomar valores entre 0 y 127. 

An = Define la altura de cada escalón 
de forma que el nivel de volumen de cada es- 
calón puede variar; con respecto al anterior, 
entre 1 y 15; sin embargo, los parámetros 
aceptados pueden ir desde -128 a +127. 

Dn = Indica la duración de cada esca- 
lón en centésimas de segundo. Puede tornar 
valores entre O y 255. 

El programa 8 nos muestra un sonido 
con envolvente de volumen definida en cinco 
secciones. La figura 8 nos muestra la envol- 
vente que utilizamos en este programa, 


Sección 5 


100 REM Aral tal IS ISA all 
110 REM * EJEMPLO DE ENVOLVENTE DE VOLUMEN EN EL AMSTRAD * 
ALO REN ORATORIA NARA AMAR AAA INACIO 
130 REM 

140 CLS 

150 LOCATE 13,13 

160 PRINT "EJEMPLO DEL COMANDO ENY" 

170 ENV 1,10,4,3,5,-3,20,1,0,20,5,3,10,10,-3,30 

180 SOUND 1,478,0,0,1,0,0 

190 GOTO 180 


El parámetro ET Estos parámetros tienen el mismo sighi- 

Al igual que con EV, ET le dice al orde- ficado que en ENV, salvo que en vez de ac- 
nador que queremos utilizar una envolvente  tuar sobre el volumen actúan sobre el tono de 
de tono que nosotros mismos hemos definido. la nota que va a sonar. Por otro lado, el argu- 
Para definirla, utilizaremos la instrucción: mento EN puede tomar valores entre 0 y 239. 


ENT N,E1,A1,D1,E2,A42,D2,E3,A3,D3,E4, El programa 9 nos muestra un ejemplo 
A4, D4,E5,A5,D5 de su utilización. 


100 REM ASS OlO OOOO flojo lolo laloklokok 
110 REM * EJEPLO DE ENT EN EL AMSTRAD x 
120 REM Ada oolololo lalalala OOOO llojokok 
130 REM 

140 CLS 

150 LOCATE 13,13 

160 PRINT "EJEMPLO DEL COMADO ENT" 

170 ENT 1,65,5,1,10,-2,10,10,2,5,30,-5,1 
180 SOUND 1,478,50,15,0,1,0 

190 GOTO 180 
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NA de las aplicaciones que El programa que vamos a ver a conti- 
más sacan partido a la alta  nuación nos permitirá representar cualquier 
resolución es la representa- tipo de función por complicada que ésta sea. 


ción gráfica 
matemáticas. 


de funciones 
Se puede de- 


cir que la alta resolución na- Con este programa incluso podremos 
ció de la necesidad de po- dibujar las asíntotas, hacer ZOOM de una par- 
der representar dichas fun- te de la función, etc. 


ciones con cierta calidad. 


10 RBA HORROR AROS 
2Q REM xxx GRAFICAS! HKAX 
30 REM Xxx Un programa realizado Xxx 
40 REM Xxx Por Ak 
50 REM Xxx Carlos A. Maria Morin Xxx 
60 REM *Xxxk xx 
FO REM *xxx* (C> Ediciones KXXk 
80 REM *x*x* Siglo Cultuúral-1987 —*Xx*xx*x 
90 REM ES 
100 REM 


110 REM AMS OSOS loja IololoJOJoK 
120 REM XXXXXxXXX INICIALIZACION AX kk 
130 REM AMS lSlO look 
140 REM 
150 BORDER 1 
160 PAPER O 
170 PEN 5 
180 CLS 
"3 190 MODE 0 
200 LOCATE 3,12 
210 PRINT"G R AF 1C Os” 
220 FOR ret=1 TO 3000 
230 NEXT 
240 MODE 2 
250 DIM aumentos (3) 


260 Al= 
270 A2= 
280 X5= 


1 
1 
0 


290 aumento=1 
300 k1$(1)="T" 
310 k15(2)="S” 
320 K15(3)="S" 
330 k1$(4)="S" 
340 k15(5)="S"” 
350 k15(6)="G"” 
360 k15(7)="N"” 
370 k15(8)="N” 
380 SYMBOL 244,0,0,60,66,129,129,66,60 
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390 SYMBOL 245,0,0,60,06,129,129,66,60 
400 WINDOW +1,1,40,25,25 

410 KEY 156,CHR$(13)+"goto 380”+CHR$(13) 
420 KEY 157,%c1s: list” +CHR$(13> 

430 KEY DEF 15,0,48,156,157 

440 REM 

450 ¿REM Ada aaa aloja lalala jalo lolalojok 
460 REM *X* PROGRAMA PRINCIPAL 'MENU' *xxXk 
4A7O REM ASS alajojolaiajolaiololajok: 


480 REM 

490 CLS 

500 BORDER 24 

510 CLS 

520 PRINT CHR$(22>;CHR$(1) 

530 LOCATE 32,2 e 


540 PRINT" GRAFICOS”. 

550 LOCATE 32,2 . 

560 PRINT" y 

570 PRINT CHR$(22);CHR$(0) 

580 PRINT:PRINT: PRINT 

590 DEF FNy(x)>=((x*(SQR(1-x))>/(SQR(x+1))) 
,600 PRINT:PRINT: PRINT: PRINT: PRINT 

610 PRINT SPACES(29);'1... Dibujar grafica." 
620 PRINT SPACE$(29);'2...Escribir formula.” 
630 PRINT SPACES(29);'3...Definir formato.” 
640 PRINT SPACES(29);'"4...Salir del programa.” 
650 PRINT: PRINT: PRINT 

660 PRINT:PRINT: PRINT 

670 LOCATE 31,24 

680 PRINT ” <<ELIGE OPCION>>  ” 

690 k$=INKEYS 

700 IF k$=”" THEN 690 ELSE k=ASC(k$)>-48 
710 1F k<1 OR k>4 THEN SOUND 1,60,10,15 ELSE 780 
720 LOCATE 31,24 

730 PRINT "<<OPCION INVALIDA>>” 

740 CLEAR INPUT 

750 FOR ret=1 TO 1500 

760 NEXT 

770 GOTO 670 

780 ON k GOSUB 1120,1040,840,800 

790 GOTO 490 

800 CLS 

810 BORDER 1 

820 END 

830. REM 

840 REM AMAS SONO OSO aloja lolololo lolo joK 
850 REM XXxX*X SELECCION DEL FORMATO xXxkxxk 
860 REM ASAS SO O ROI JOR 
870 REM 

880 CLS 

890 PRINT: PRINT” FORMATO: ” 

900 PRINT: PRINT: RESTORE 

910 FOR f=1 TO 8 

920 READ af$,neg$, men$ 

930 PRINT mens; 

940 1F £f=7 THEN PRINT "Margen cuando XY ”CHR$(154>+CHR5(243)” "CHR$5(244)>+CHR$(24 
DNP E 

950 PRINT k1$(£)")> ”; 

960 kS$=INKEYS 

970 IF k$="" THEN 960 ELSE k$=UPPERS(k$) 

980 IF k$<>"” THEN IF k$=af$ OR k$=neg$ THEN k1$(f)>=k8 

990 IF k$<>af$ AND k$<>neg$ THEN PRINT ELSE PRINT k1$(f)> 

1000 NEXT £f 

1010 RETURN 

1020 STOP 

1030 REM 
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1040 REM ======== VOLVER AL MENU ======== 
1050 REM 
1060 CLS 
1070 LOCATE 21,24 
1080 PRINT"Cambiar la ecuacion y pulsar [SHIFTI y (01” 
1090 LOCATE 20,10 
1100 EDIT 590 
1110 GOTO 490 
1120 CLS 
1130 PAPER 2 
1140 PEN 5 
1150 BORDER 1 
1160 CLS 
1170 IF k15(6>)="R” THEN RAD ELSE DEG 
1180 REM 
1190 REM AAC OOCIOIOOIOO OOOO OOO 
1200 REM AxAOMONOOk DIBUJA EJES AX AIAAR 
1210 REM oooO OOOO OOOO IO OK , 
1220 REM 
1230 ORIGIN 440,200 
1240 MOVE -200,0:DRAW -200,200 
1250 MOVE -200,199: DRAW 200,199 
1260 MOVE 199,199: DRAY 200,-200 
1270 MOVE 0,0: MOVE -200,0 
1280 DRAW -200,-199: MOVE -200,-200 
1290 DRAW 200,-200: MOVE 199,-200 
1300 DRAW 199,200: MOVE 5,38 
1310 DRAW -5,38: MOVE 5,76 
1320 DRAW -5,76: MOVE 5,114 
1330 DRAW -5,114 
1340 IF k1$(2)=”S” THEN MOVE 200,0:DRAW -200,0 
1350 MOVE 5,152: DRAW -5, 152 
1360 MOVE 5,190: DRAW -5,190 
1370 MOVE 5,-38 :DRAW -5,-38 
1380 MOVE 5,-76:DRAW -5,-76 
1390 MOVE 5,-114:DRAW -5,-114 
1400 MOVE 5,-152:DRAW -5,-152 
1410 MOVE 5,-190:DRAW -5,-190 
1420 PLOT 0,0 
1430 IF k1$(3)="S" THEN MOVE 0,200: DRAW 0,-200 
1440 MOVE 38,5:DRAW 38,-5 
1450 MOVE 76,5:DRAW 76,-5 
1460 MOVE 114,5:DRAW 114,-5 
1470 MOVE 152,5: DRAW 152,-5 
1480 MOVE 190,5: DRAW 190,-5 
1490 MOVE -38,5:DRAW -38,-5 
» 1500 MOVE -76,5: DRAW -76,-5 
1510 MOVE -114,5:DRAW -114,-5 
1520 MOVE -152,5:DRAW -152,-5 
1530 MOVE -190,5:DRAW -190,-5 
1540 IF k15(8)="S” THEN GOSUB 3430 
1550 REM 
1560 REM FMI dlollolorajoloK 
1570 REM * SELECCION DE ESCALA Y AUMENTO x* 
1580 REM ada jojojo lalala aldo lalo oJojoO oo 
1590 REM 
1600 LOCATE 1,1 
1610 PRINT "Escala del eje X:”;¡Al; 
1620 INPUT ¡A1S 
1630 IF A18<>"” THEN A1=VALCA1S) 
1640 LOCATE 18,1 
1650 PRINT Al;" PE 
1660 LOCATE 1,2 
1670 PRINT"Escala del eje Y:”";A2; 
1680 INPUT A2$ 
1690 IF A2$<>"”" THEN A2=VAL(A23) 
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1700 


LOCATE 18,2 
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1710 PRINT A2;” y 

1720 LOCATE 31,12 

1730 PRINT"X="; INT(1000x200/A41>/1000 

1740 LOCATE 58,1 

1750 PRINT"Y="; INT(1000*x200/A2)/1000 

1760 LOCATE 1,3 

1770 PRINT"Ampliacion en eje X (0-9>”; 

1780 INPUT aumento$(1> 

1790 LOZCATE 27,3 

1800 PRINT ” "¡aumentos$(1) 

1810 IF aumento$(1)<>”” AND aumentos$(1><>'"0” THEN 1820 ELSE 1870 
1820 IF aumento$(1)<>"1” AND aumento$(1><>"2'" THEN 1830 ELSE 1870 
1830 IF aumento$(1)<>"3” AND aumento5(1><>'4” THEN 1840 ELSE 1870 
1840 IF aumento$(1>)<>”5” AND aumento$5(1)<>'"6"” THEN 1850 ELSE 1870 
1850 IF aumento$(1)<>"7" AND aumento$(1><>'8"” THEN 1860 ELSE 1870 
1860 IF aumento$5(1)<>"9" THEN 1760 ELSE 1870 

1870 LOCATE 1,4 

1880 PRINT"Ampliacion en eje Y (0-9)>”; 

1890 INPUT aumentos$(2) 

1900 LOCATE 27,4 

1910 PRINT ” "¡aumento$(2) 

1920 IF aumentos$(2)<>”'” AND aumentos$(2><>"0'" THEN 1930 ELSE 1980 
1930 IF aumentos(2)<>”1” AND aumentosS(2)<>"2" THEN 1940 ELSE 1980 
1940 IF aumento$(2)<>"3” AND aumento$(2)<>'4” THEN 1950 ELSE 1980 
1950 IF aumentos(2)<>"5" AND aumentos(2)<>”6" THEN 1960 ELSE 1980 
1960 IF aumentos(2)<>"7” AND aumento$(2)<>"8" THEN 1970 ELSE 1980 
1970 IF aumento$(2)<>”9” THEN 1870 ELSE 1980 

1980 IF aumentos$(1>=”" THEN aumento(1>=1 

1990 IF aumento$(1>="0" THEN aumento(1>)=10 

2000 1F aumento$(1)=”1'" THEN aumento(1>=20 

2010 1F aumento$(1)="2" THEN aumento(1)=30 

2020 IF aumento$(1)="3" THEN aumento(1>=40 

2030 IF aumento$(1>="4" THEN aumento(1>=50 

2040 IF aumentos$(1>='"5"” THEN aumento(1>=60 

2050 IF aumentos$(1>="6" THEN aumento(1)=70 

2060 IF aumentos(1)="7'"” THEN aumento(1)=80 

:2070 IF aumento$5(1)="8” THEN aumento(1>=90 

2080 IF aumento$(1>="9" THEN aumento(1>=100 

2090 IF aumento$(2)="" THEN aumento(2)=1 

2100 IF aumento$5(2)="”0” THEN aumento(2>=10 

2110 1F aumentos(2)="1" THEN aumento(2)=20 

2120 IF aumento$(2)="2" THEN aumento(2)>=30 

2130 IF aumento$(2)="3" THEN aumento(2)=40 

2140 IF aumento$(2)="4'" THEN aumento(2>=50 

2150 IF aumento$(2)="5" THEN aumento(2)=60 

2160 IF aumento$(2)="6” THEN aumento(2)=70 

2170 1F aumento$(2)="7" THEN aumento(2)=80 

2180 IF aumento$(2)="8"” THEN aumento(2)=90 

2190 IF aumento$(2>)="9" THEN aumento(2)=100 

2200 IF k1$(4)="N" THEN LOCATE 1,5: INPUT "STEP; ”;¡S 

2210 IF k15(4)="N" THEN ELSE S=2/A1;LOCATE 1,5:PRINT"STEP:";"”Autonm.";S;” 
2220 IF S=0 THEN S=2/A1 

2230 IF k1$5(1)="T'" THEN 2820 ELSE 2260 

2240 END 

2250 REM 

2260 REM AAAMOOO SOS OOOO OK 

2270 REM *k TRATAMIENTO GRAFICO DE FUNCIONES x*x 

2280 REM ARARARRARAOOORORORORAROAOO RO OO OO O KK 

2290 REM 

2300 ON ERROR GOTO 3380 

2310 LOCATE 1,8 

2320 PRINT"Funcion: f(x)" 

2330 MOVE X5,0 

2340 FOR X=X5 TO 200/A1 STEP S 
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2350 


2360 
2370 
420 

2380 
2390 
2400 
2410 
2420 
2430 
2440 
2450 
2460 


2470. 
2480 
530 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 


2580 
2590 
640 

2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 


2690 
2700 
750 
2710 
2720 
A 2730 
2740 
2750 
2760 
2770 
2780 
2790 
2800 
2810 
2820 
2830 
2840 
2850 
2860 
2870 


2880 
2890 
2940 
2900 


IF k15(5)="S" THEN LOCATE 1,6:PRINT ”X:”;XPOS;: LOCATE 1,7:PRINT”Y:”; YPOS” 
”» 
IF X*xA1>32750 OR YxA2>32750 OR XxA1<-32750 OR YxA2<-32750 THEN 2410 
IF k18(7)="N” THEN IF XPOS>205 OR XPOS<-205 OR YPOS>205 OR YPOS<-205 THEN 2 


px=X*A1xaumento(1) 
py=INTCFN y(X)*A2*aumento(2)) 


PLOT px, py 
NEXT 
LOCATE 1,8 


PRINT*Funcion: £f (-x)” 
MOVE -200/41,0 
FOR X=(-200/A1>/aumento(2) TO X5 STEP S 
1F k18(5)="S” THEN LOCATE 1,6: PRINT ”X:”;XPOS; : LOCATE 1,7: PRINT"Y:”;YPOS” 
” 
IF XxA1>32750 OR YxA2>32750 OR Xx*xAi<-32750 OR Y*A2<-32750 THEN 2520 
1F k18(7>)="N” THEN IF XPOS>205 OR XPOS<-205 OR YPOS>205 OR YPOS<-205 THEN 2 


px=X*Alkxaumento(1) 

py=INTCFN y(X>XA2*kaumento(2)) 

PLOT px, py 

NEXT 

LOCATE 1,8 

PRINT"Funcilon;-f(x)” 

MOVE X5,0 

FOR X=X5 TO 200/A1 STEP S 

IF k1$(5)=”S” THEN LOCATE 1,6: PRINT ”X:";XPOS; : LOCATE 1,7: PRINT"Y:”;YPOS” 


” 


IF X*xA1>32750 OR YxA2>32750 OR XxA1<-32750 OR YkA2<-32750 THEN 2630 
IF k18(7)="N" THEN IF XPOS>205 OR XPOS<-205 OR YPOS>205 OR YPOS<-205 THEN 2 


px=X*xAlkaumento(1> 
Ppy=INT(-C(FN y(X>*A2kaumento(2))>) 


PLOT px, py 
NEXT 
LOCATE 1,8 


PRINT"Funcion: -f (-x)” 
MOVE -200/A1,0 
FOR X=((-200/A1>/aumento(2)> TO X5 STEP S 
IF k15(5)="S” THEN LOCATE 1,6:PRINT ”X:”;XPOS; :LOCATE 1,7: PRINT"Y:"; YPOS" 
” 
1F XxA1>32750 OR YxA2>32750 OR XxA1<-32750 OR YxA2<-32750 THEN 2740 
IF k18(7)="N" THEN JF XPOS>205 OR XPOS<-205 OR YPOS>205 OR YPOS<-205 THEN 2 


px=Xx*xAlx*xaumento(1) 

py=INT(=(FN y(X)kA2*Xaumento(2))) 

PLOT px, py 

NEXT 

LOCATE 1,12 

PRINTS OOIOIIOoJoK” 

LOCATE 1,13 

PRINT"*PULSA UNA TECLAX” 

LOCATE 1,14: PRIN TRAJANO AA 

CALL S:BB06; REM EN ESPERA DE QUE SE PULSE UNA TECLA 

GOTO 490 

ON ERROR GOTO 3380 

LOCATE 1,8 

PRINT"Funcion:; f(x)” 

MOVE X5,0 

FOR X=X5 TO 200/A1 STEP S 

IF k1$(5)="S” THEN LOCATE 1,6:PRINT "X;”;XPOS; : LOCATE 1,7: PRINT"Y:";YPOS” 
” 

IF XxA1>32750 OR Y*A2>32750 OR X*xA1<-32750 OR Y*A2<-32750 THEN 2930 

IF k18(7)="N" THEN IF XPOS>205 OR XPOS<-205 OR YPOS>205 OR YPOS<-205 THEN 


px=X*xAlkaumento(1> 
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2910 py=INT(FN y(X)XA2kaumento(2)) 

2920 DRAW px, py 

2930 NEXT 

2940 LOCATE 1,8 

2950 PRINT"Funcion: f (-x)>” 

2960 MOVE -200,0 

2970 FOR X=(-200/A1)/aunento(2) TO X5 STEP S 

2980 IF k15(5)="S'" THEN LOCATE 1,6; PRINT "X:”;XPOS; :LOCATE 1,7: PRINT"Y:”; YPOS)' 
” 

2990 IF X*A1>32750 OR Y*A2>32750 OR XxA1<-32750 OR YxA2<-32750 THEN 3040 

3000 IF k1$(7)="N" THEN IF XPOS>205 OR XPOS<-205 OR YPOS>205 OR YPOS<-205 THEN 3 

050 

3010 px=Xx*Alkaumento(1) 

3020 py=INT(FN y(X)XA2kaumento(2)) 

3030 DRAW px, py 

3040 NEXT 

3050 LOCATE 1,8 

3060 PRINT"Funcion: -£f(x)" 

3070 MOVE X5,0 

3080 FOR X=X5 TO 200/A1 STEP Ss 

3090 IF k15(5)="S” THEN LOCATE 1,6: PRINT "X:”;¡XPOS; :LOCATE 1,7: PRINT"Y:”;¡YPOS” 
” 

3100 IF XxA1>32750 OR YxA2>32750 OR XxA1<-32750 OR Y*A2<-32750 THEN 3150 

3110 IF k1$(7)="N” THEN IF XPOS>205 OR XPOS<-205 OR YPOS>205 OR YPOS<-205 THEN 3 

160 

3120 px=X*Alkaumento(1) 

3130 py=INT(-CFN y (O) xA2kaumento(2))) 

3140 DRAW px, py 

3150 NEXT 

3160 LOCATE 1,8 

3170 PRINT"Funcion: -f(-x)" 

3180 MOVE -200,0 

3190 FOR X=(-200/A1)/aumento(2> TO X5 STEP S 

3200 IF k1$(5)="S"” THEN LOCATE 1,6:PRINT "X:";XPOS; : LOCATE 1,7: PRINT"Y:”; YPOS” 
” 

3210 IF X*A1>32750 OR Y*A2>32750 OR XxA1<-32750 OR YxA2<-32750 THEN 3260 

3220 IF k18(7)="N" THEN IF X>205 OR X<-205 OR YPOS>205 OR YPOS<-205 THEN 3270 

3230 px=Xx*Alkaumento(1) 

3240 py=INT(-C(FN y(X)XA2kaumento(2))) 

3250 DRAW px, py 

3260 NEXT 

3270 LOCATE 1,12 

3280. PRINT"AORROOOOOIOdO ak” 

3290 LOCATE 1,13 

3300 PRINT"*PULSA UNA TECLAx” 

3310 LOCATE 1,14 

3320. PRINTRROSRORROSOOIOJOÓK” 

3330 CALL 8:BBO6: REM EN ESPERA DE QUE SE PULSE UNA TECLA 

3340 GOTO 490 

3350 REM 

3360 REM ===== TRATAMIENTO DE ERRORES ===== 

3370 REM 

3380 LOCATE 1,9 

3390 PRINT "*x*XX*ERROR SOBREPASA RANGO” 

3400 RESUME NEXT 

3410 END 

3420 REM 

3430 REM ARARAAA O lOlOISlOIlIllIK KK k 

3440 REM xXxKkxkkk DIBUJA CUADRICULA *Xxkxxkk 

3450 REM AMAS RIOROROIOIOIOIIOO A 

3460 REM 

3470 ORIGIN 440,200 

3480 MOVE 200,38: DRAW -200,38 

3490 MOVE 200,76: DRAW -200,76 

3500 MOVE 200,114:DRAW -200,114 

3510 MOVE 200,152:DRAW -200,152 
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TRUCOS Y RUTINAS BASICAS 


3520 MOVE 200,190: DRAW -200, 190 
3530 MOVE 200,-38 :DRAW -200,-938 
3540 MOVE 200,-76:DRAW -200,-76 
3550 MOVE 200,-114: DRAW -200,-114 
3560 MOVE 200,-152: DRAW -200,-152 
3570 MOVE 200,-190: DRAW -200,-190 
3580 MOVE 38,200: DRAW 38,-200 


3590. MOVE 76,200:DRAW 76,-200 


3600 MOVE 114,200:DRAW 114,-200 
3610 MOVE 152,200:DRAW 152,-200 
3620 MOVE 190,200:DRAW 190,-200 
3630 MOVE -38,200:DRAW -38,-200 
3640 MOVE -76,200:DRAW -76,-200 
3650 MOVE -114,200:DRAW -114,-200 
3660 MOVE -152,200:DRAW -152,-200 
3670 MOVE -190,200:DRAW -190,-200 


3680 RETURN 
3690 END 
3700 REM 


3710 REM AAA RASO ORIO 
3720 REM AAA K  DATAS AOS 
IES 


. «Escribe valores de x e y. ( 


Radianes o Grados. ( 


3740 REM 

8750 DATA P,T,1...Punto o Trazo. ( 
3760 DATA S,N,2... Dibuja eje x. ( 
3770 DATA S,N,3...Dibuja eje y. ( 
3780 DATA S,N,4...STEP Auto. ( 
3790 DATA S,N,5. 

3800 DATA R,G,6...Fn. Tri. 

3810 DATA S,N,7.. 

3820 DATA S,N,8. 


El programa parece realmente indica- 
do para aquellos estudiantes que han alcanza- 
do un nivel igual o superior a tercero de BUP. 
El programa les podrá servir para compro- 
bar que sus ejercicios están bien hechos. Este 
programa también tiene otra utilidad. Esta 
consiste en poder enseñar a aquellos a los que 
las matemáticas no terminan de convencerles, 
que son una ciencia bonita, que no todo son 
números y letras, que toda esa avalancha de 


> 


Fig, 1. Podemos variar el formato de salida. 
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. Dibuja cuadricula. ( 


números, si los ordenamos adecuadamente, 
puede formar dibujos realmente increíbles. 

Al ejecutar el programa nos aparecerá 
un menú con cuatro opciones. Estas son: 


Dibujar gráfica. 
Escribir fórmula. 
Definir formato. 
Salir del programa. 


A 


Si pulsamos la opción 2, nos aparecerá 
en pantalla la función que en ese momento tie- 
ne almacenado el ordenador. Para cambiarlo 
sólo tenemos que teclear la nueva función y 
pulsar las teclas SHIFT y 0 a la vez. 

Con la opción 3 podemos definir el for- 
mato que tendrá la representación gráfica de 
dicha función en la pantalla. Podremos decir 
si queremos que aparezcan los ejes de coor- 
denadas, si queremos dibujar con puntos o lí- 
neas, si queremos asíntotas, cuadrículas, etcé- 
tera. 

Con la opción 1 representamos la fun- 
ción que hemos definido con la opción 2 y cu- 
yas características hemos dado con la opción 
3. Una vez que el ordenador haya dibujado la 
ventana donde dibujará dicha función, nos 
preguntará qué escala queremos que tenga el 
eje X y el eje Y. Ambos pueden tener una gra- 


duación distinta. Por otro lado, también pode- de servir para que podamos ver con más cla- 
mos decir si queremos que haya ampliación ridad una parte de la funcion que no se ve 
en X o en Y o en ambas a la vez. Esto nos pue- bien. 


Fig. 2. Fig. 3. Representación con cuadrícula. 
En el caso de que no hayamos querido STEP deseamos. Como norma general, el STEP 


el STEP automático cuando hemos definido el. automático será suficiente para nuestras nece- 
formato, el ordenador nos preguntará qué  sidades. 
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EL TALLER DEL HARDWARE 


Tarjeta digitalizadora de vídeo, con interfaz del tipo empleado en la tarjeta de 
ampliación de puertos de entrada salida. 
Segunda parte 


z Circuito de tratamiento digital 
N el tomo anterior se ha des- 


crito el funcionamiento en 


general de la tarjeta de di-  ' Reloj | 
gitalización de imágenes de 
vídeo y el circuito de trata- El reloj de punto CKP es generado con 


miento analógico de la se- un multivibrador monoestable contenido en el 14 
ñal. Continuamos con la des- circuito integrado Ul2. Cuando el biestable B4 
cripción de los circuitos de (figura 1) lo permite (PERMISO = 1), la propia 

control digital y del programa que permite su salida del monoestable excita su entrada, com- 

empleo a través de un ordenador personal, portándose como un multivibrador estable. El 


PERMISO 


NOTA: D,, OC PIN 
n CE 
cx 


DD;D;D¿D¿D;DyDy 
M5 MP 


Fig. 1. Circuito digital: Reloj de punto, contadores, comparadores y puertos. 
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potenciómetro P3 se deberá ajustar para que 
la frecuencia de la señal generada sea de 5 
MHz. 


Contadores de posición 


Los circuitos U8 y U9 son dos contado- 
res de 4 bits encadenados que conforman el 
contador Y. Al llegar a la cuenta 255, la salida 
RC de U9 hace que el biestable B3 cambie de 
estado, reseteando (cuenta 0) el contador con 
el próximo pulso de SH y manteniéndolo en di- 
cho estado hasta la recepción de un nuevo 
flanco de bajada de la señal de sincronismo 
vertical que hace que la salida del biestable 
B3 pase a valor «1» y permita de nuevo el con- 
tar los pulsos SH. 

Los circuitos U6 y U7 conforman el con- 
tador X. Estos contadores se incrementan con 
los flancos positivos de la señal CKP de 5 MHz 
de frecuencia. A la llegada de pulso 255 de di- 
cha señal, U7 genera un pulso en la salida RC, 
que pone a «0» la salida del biestable B4 que 
a su vez hace que las salidas del contador pa- 
sen al valor «0» y permanezcan en dicho esta- 
do hasta la llegada del próximo flanco negati- 
vo de la señal SH. Es importante observar la 
analogía existente entre las señales CKP y SH 
de este circuito y las SH y SV del anterior. 


Comparador 


Los circuitos integrados U2, U3, U4, U5 
constituyen un comparador digital de pala- 
bras de 16 bits. Las salidas de los contadores 
de posición X e Y están conectadas a la sec- 
ción B del comparador, estando la sección de 


entrada A conexionada con los 2 puertos de 8 
bits X e Y. 

Cuando ambas palabras son iguales y la 
comparación está permitida (EDC = «1»), la sa- 
lida EQU de U2 se pone a «1». Esta señal se uti- 
liza en el circuito de control como posterior- 
mente se describirá. 


Puertos de entrada y salida 


Los puertos de salida X e Y (Ul y U0 en 
figura 1) se han realizado con los circuitos in- 
tegrados 741/5374, constituido por 8 biestables 
síncronos de tipo D. Para la escritura en los 
mismos se ha conectado las señales -SELWO 
y -SELWl, que son activas a nivel bajo a las 
entradas de reloj de los chips. El circuito de- 
codificador de la figura 5 es el encargado de 
generar las señales de escritura anteriores a 
partir del bus de direcciones y las señales de 
lectura y escritura en puerto procedentes del 
microprocesador. 

Como puerto de entrada para el micro- 
procesador (Ul6 en figura 2), se utiliza tam- 
bién el circuito integrado 741:5374. En este re- 
gistro se almacenan los 8 bits correspondien- 
tes a una digitalización. Para proceder a su 
lectura se ha de poner su entrada «OUTPUT 
CONTROL» a «0», lo que se consigue con su co- 
nexión a la línea SELR2, activa baja y genera- 
da también por el circuito decodificador. 

Como puerto de entrada para leer el es- 
tado de la señal EOC (Ul?7 en la figura 2) del 
circuito de control se utiliza el C.I. 7415244, 
Para leer dicha variable es necesario poner a 
estado «0» las entradas de Enable de dicho 
chip, lo que se consigue conectando a éstas la 
salida de SELR3 del circuito decodificador. 


Fig. 2. Circuito de control. 


EN DD, D, D, D,D, 


45 E0C 
a 


246411 


| ia | 
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Ma 


SELRI 


Bas Datos yp NOTA: Wjy VCC PIN 14 


GND PIN 7 
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EL TALLER DEL HARDWARE 
Circuito de control 


Los comentarios posteriores se harán 
con referencia a las figuras 2 y 3, donde se re- 
presentan el circuito y el diagrama temporal 
de las señales a él asociadas. 


La señal de escritura en el puerto Y se 
utiliza como señal de comienzo para la digita- 
lización de los 8 pixels. El flanco positivo de 
este pulso pone a 1 el biestable B5, habilitan- 
do el comparador de 16 bits. Cuando los con- 
tadores de posición del pincel electrónico 
coinciden con las coordenadas escritas en los 
dos puertos de salida X e Y, el comparador ge- 
nera un pulso (EQU) de una duración de 200 


Fig: 3. Evolución de las señales en el circuito de control. 


Programación de la tarjeta 


El objetivo de este apartado es sentar 
las bases del programa que mediante la utili- 
zación de la circuitería hardware anterior- 
mente definida digitalice la imagen y la pre- 
sente en el monitor de alta resolución del or- 
denador personal. 

Previamente a digitalizar la imagen de- 
berá colocar el modo pantalla de su ordena- 
dor en modo de alta resolución y limpiar la 
pantalla. Para estas dos operaciones existen 
subrutinas en todos los sistemas operativos 
que pueden ser llamadas desde sentencias es- 
peciales desde lenguajes de alto nivel. 
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nanosegundos, que hace que el biestable B6 
capture la salida del biestable 5 que anterior- 
mente había puesto a 1 la señal START, ha- 
ciendo que su salida SS se ponga a 1. Esta ac- 
ción habilita el contaje de pulsos de reloj al 
contador de 4 bits Ul4. A la llegada del octa- 
vo pulso de reloj de salida Qd de dicho con- 
tador se pone a 1, haciendo que el registro de 
8 bits Ul6 capture el dato procedente del re- 
gistro o de desplazamiento Ul5 y que el mo- 
noestable M4 genere un pulso de 100 nanose- 
gundos de duración. Este pulso pone a «0» la 
salida de los dos biestables B5 y B6, resetean- 
do asimismo el contador, con lo que el circui- 
to queda en condiciones de recibir otro pulso 
de START. 


Es aconsejable que la mayoría de los 
programas de aplicación que utilicen esta tar- 
jeta se escriban en lenguaje ensamblador. 
Esto es debido, por una parte, a la gran canti- 
dad de información involucrada en una ima- 
gen (8 K octetos), y, por otro lado, a los condi- 
cionantes de tiempo existentes para una digi- 
talización eficiente de la imagen. Las dos cir- 
cunstancias anteriores hacen del uso de len- 
guajes de alto nivel poco eficaz. La rutina del 
ensamblador que deberá estar en todos los 
programas es la rutina para digitalizar ocho 
pixels. Esta rutina, cuyo programa se presen- 
ta a continuación, se ha escrito en ensambla- 
dor del microprocesador Intel 8088, aunque no 


le será difícil traducirla al lenguaje ensambla- 
dor del microprocesador que contenga su or- 
denador personal. 

Los nombres PUERTOX, PUERTOY, 
CONTROL y PUERTOIN del programa corres- 
ponden en la realidad con las direcciones fí- 
sicas asignadas a los mismos mediante el cir- 
cuito decodificador, como se explicó en un ar- 
tículo anterior de esta misma serie: 


¿+ PROGRAMA DE LECTURA DE PIXEL 
MOV AL, CODRDX 3 CARGA EN ACUMULADOR PDORDENADA % 
OUT PUERTOX,AL 3 SACA POR PUERTO x COORDENADA x 
MOV AL, CODRDY 3 CARGA EN ACUMULADOR COURDENADA Y 
OUT PUERTOY,BL- 5 SALA FOR PUERTO! COORDENADA Y 
3 ARRANCA COMPARADOR 


BUCLE IN AL,CONTROL j CARGA EN ACUMULADOR REGISTRO CONTROL 


AND AL, 1O0N0000000B 3 £ TERMINADA DIGITALIZACIÓN EOCs=0 > 
YNZ"- BUCLE 3 NO. .SIGUE ESPERANDO 
IN AL, PUERTOLN 3 5ls CARGA EL VALDR OBTENIDO 


La misión de esta rutina es fácil de com- 
prender con las indicaciones anteriores. La ru- 
tina comienza por escribir, en primer lugar, la 
coordenada X en el puerto PUERTOX y, pos- 
teriormente, la coordenada Y en el puerto 
PUERTOY; la escritura de esta última coorde- 
nada habilita los comparadores y comenzará 
la búsqueda de las coordenadas escritas. La 
captura de los 8 pixels por parte de la tarjeta 
es indicada al efectuar una transición de «l» a 
«0» el bit más significativo del registro de en- 
trada CONTROL, que está conectado, como 
anteriormente se indicó, a la señal EOC, Esta 
transición es detectada por las tres instruccio- 
nes que conforman el bucle de espera. Una 
vez se detecta que dicho bit está a «0», obten- 
dremos en el acumulador AL un octeto cuyo 
bit más significativo corresponde al valor di- 
gital del pixel (X,Y). El bit menos significativo 
se corresponde con el valor del pixel de coor- 
denadas (X+7,Y). El valor de coordenada X 
podrá estar comprendido entre 0 y 248 (tén- 
gase en cuenta que una coordenada X supe- 
rior a 248 daría lugar a un funcionamiento in- 
correcto del circuito) y la coordenada Y entre 
0 y 255. 

Utilizando la rutina anterior se presenta 
un programa que digitaliza la imagen comple- 
ta y la presenta en el monitor de un IBM-PC, 
El programa supone que los gráficos de alta 
resolución en blanco y negro (640*200) están 
activados. La zona de memoria gráfica en este 
caso comienza en el segmento X'800" para las 
filas pares y en X'BA00” para las impares. Es- 
tas direcciones tendrá que modificarlas según 
sea su ordenador. Además, esta memoria es 
bit-mapped, lo que quiere decir que cada oc- 


35 


teto de la memoria se corresponde con 8 
pixels consecutivos de la misma línea en pan- 
talla, correspondiendo el más significativo al 
pixel izquierdo de la serie de ocho. Como se 
observa, el octecto obtenido en el puerto de 
entrada tiene la misma estructura que la de la 
memoria gráfica comentada. 


w Listado del programa 


La misión del programa anterior es la 
de digitalizar una columna de 8 pixels de an- 
cho por cada cuadro. Para ello utiliza la rutina 
de digitalización de 8 pixels 200 veces, con 
una «X» determinada y haciendo variar «Y» 
desde 32 hasta 232, con lo que se digitaliza úni- 
camente la parte central de la imagen. Cada 
octeto obtenido es almacenado secuencial- 
mente en un vector denominado TABLA y 
cuando se alcanza la ordenada 232 se traspa- 
sa dicho vector a la memoria gráfica en el 
tiempo que transcurre hasta que al pincel 
electrónico llegue de nuevo la ordenada 32, 
no perdiendo ningún cuadro. La transferencia 
se realiza teniendo en cuenta que los octetos 
que ocupan una posición par en el vector TA- 
BLA se almacenarán en el buffer de memoria 
gráfica correspondiente a las filas pares, ha- 
ciendo la operación equivalente con los octe- 
tos que ocupan posiciones impares en el vec- 
tor. El proceso anterior se repite desde X = 0 
hasta X = 248 con incrementos de 8, finalizan- 
do el proceso en la última abscisa. 


Cuando se escriba dicha rutina en el 
ensamblador del microprocesador que se po- 
sea, téngase en cuenta que si se pretende di- 
gitalizar la misma columna de 8 pixels en cada 
cuadro, el tiempo de que dispone para escri- 
bir coordenadas, obtener el dato y almacenar- 
lo en memoria, así como la actualización de 
punteros y variables ha de ser menor que el 
tiempo de duración de una línea: 64 microse- 
gundos. Si no es así, el programa tendrá que 
esperar al próximo cuadro, puesto que la tra- 
za habrá superado las coordenadas deseadas. 
Esto da lugar a que deberá escribir un pro- 
grama optimizado para que su duración sea 
menor de 64 microsegundos en el caso de no 
poder conseguirlo, se podría digitalizar en un 
campo 8 pixels de cada fila par o impar, con 
lo que dispondría para realizar las operacio- 
nes anteriores de 128 microsegundos. 


Como para los lenguajes de alto nivel 
es difícil calcular los tiempos de ejecución 


EL TALLER DEL HARDWARE '- 


porque se desconoce el código objeto gene- Xi Listado de salida del ensamblaje de 
rado, no es aconsejable su uso si se va a utili- 


zar el hardware diseñado con su plena poten- un programa de lectura 


cia, 
1 ; Programa que digitaliza la señal de vídeo por columnas y 
2 ; la presenta en memoria gráfica 
El da IS 
4 ; BX -- puntero a vector TABLA y puntero a filas impares en vídeo-buffer 
5 ¡; SI -- puntero a TABLA 
6 ; DI” -—- puntero a filas pares vídeo-buffer 
1 ; BP. -- coordenada Xx 
8 ; CH -- coordenada y 
9 pr 
10 ; Direcciones de los puertos de entrada y salida 
11 = 0300 puertox equ 300h ; puerto que contiene coordenada X 
12 = 0301 puertoy equ 301h ¡puerto que contiene coordenada Y 
13 = 0302 puertoin equ 302h ¡puerto que contiene valor pixels 
14 = 0303 control equ 303h ¡puerto que contiene señal EOC 
15 e 
16 ; Segmento de datos 
17 0000 dataseg segment 
18 0000 C8[ tabla db 200  dup (?) 
19 2? 
20 ] 
21 
22 00C8 dataseg ends 
23 e 
24 ; Segmento de memoria gráfica 
25 0000 vídeo segment at 0b800h 
26 0000 buu label byte 
27 0000 vídeo ends 
28 A 
29 ; Segmento de código 
30 0000 codeseg segment 
31 0000 main proc far 
32 assume cs:codeseg,ds:datseg,es: Vídeo 
33 0000 comienzo 
“34 ; Introduce en stack segmento y offset de datos 
35 0000 1E push ds 
36 0001 B8 0000 mov ax,0 
37 0004 50 push ax 
38 ; Pone en Ds segmento de datos 
39 0005 B8 ---- R mov ax,dataseg 
40 0008 8E D8 mov ds,ax 
4] ; Pone en ES segmento vídeo-buffer 
42 0004 B8 ---- R mov ax, vídeo 
43 000D 8E CO mov es,ax 
44 a 
45 ; Inicializaciones 
46 000F FC cld ; SI se incrementará 
47 0010 BFO0000 mov di,0 ; DI puntero a vídeo-buffer 
48 0013 BD0000 mov bp,0 ; x=0 ¡inicializa coordenada x 
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49 0016 
50 0018 
51 : 
52 001C 
53 001F 
54 0021 
55 0022 


56 0025 
57 0027 


58 
59 0028 
60 002B 
61 002€ 
62 002E 


63 
64 0030 
65 0033 


66 
67 0034 
68 0036 


69 ; 
70 0037 
71 0039 
72 003C 


73 
74 003E 
75 003F 
76 0043 
17 0045 
78 0049 


79 004€ 
80 004D 
81 0050 
82 0053 
83 0056 
84 0059 


85 
86 005B 
87 005C 


88 

89 005D 
90 0060 
91 0064 


92 
93 0066 
94 0067 
95 0067 
96 


B5 20 orden: mov ch,32 ; y=32, inicializa coordenada y 
8D 1E 0000 R- lea bx,tabla ; carga a dirección inicial tabla en BX 
Saca coordenadas por los puertos 


BA 0300 mov dx,puertox ¡saca coordenada x por puerto A 
8B C5 mov ax,bp 
EE out dx,al 


BA 0301 saca: mov dx,puerto y; saca coordenada y por puerto B 
8A C5 mov al,ch 


EE out dx,al ; desinhibe tarjeta 
; Espera a que se encuentre el punto EQU=1 y se digitalice EOC=1 

BA 0303 mov dx,control 

EC espera: in al, dx 

24 80 * and al,10000000b ; EOC en bit 7 de reg. control A 

75 FB jnz espera 
; Consigue vídeo-byte 

BA 0302 mov dx puertoin 

EC in al, dx 
; Almacénalo en tabla 

88 07 mov ds:[bx],al 

43 inc bx ; bx apunta a próximo byte en TABLA 
; Control de filas 

FE C5 inc ch ; próxima fila 

80 FD E8 cmp ch,232 ; realizadas las 200 filas ? 

75 E4 jnz saca ; ho, vuelve con la ordenada siguiente 
; Almacenamiento en vídeo-buffer 

57 push di ; almacena puntero vídeo-buffer 

8D 36 0000 R almac: lea si,tabla ¡carga con dirección inicial tabla 

8B DF mov bx,di 

81 C3 2000 add bx,2000h ; bx apunta a filas impares 

B9 0064 mov cx,100 ; 200 filas en video-buffer 

AD allí: lodsw ; al fila par, ah - fila impar 

26: 88 05 mov es:[di],al ; almacénalo en fila par 

26: 88 07 mov es:¡bx],al ; almacénalo en fila impar 

83 C3 50 add bx,80 ; próxima fila impar 

83 C7 50 add di,80 ; próxima fila par 

E2 Fl loop allí 
; Control abscisas 

SE pop di ; Tecupera puntero vídeo-buffer 

47 inc di ; próxima columna en vídeo-buffer 
; Control abscisas 

83 C5 08 add bp,8 

81 FD 0100 cmp bp,256 

75 BO jnz orden 

Vuelve al DOS 

CB ret 

main endp 
codeseg ends 


end comienzo 
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EL TALLER DEL HARDWARE 000007070 


Segments and groups: 


Name 
CODESEG 
DATASEG 


COMIENZO 
CONTROL 


Warning Severe 


Errors Errors 
0 0 


Aplicaciones 


La digitalización de imágenes a partir 
de señal de vídeo es un medio muy atractivo 
para diseñar paquetes de programas que pre- 
senten figuras del mundo real. La resolución 
de las pantallas de los ordenadores persona- 
les económicos es, en general, muy limitada, 
pero resulta suficiente para poder mantener 
en un solo medio mecanizado tanta informa- 
ción codificada como la de tipo gráfico e imá- 
genes. 
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combine class 
NONE 

NONE 

B800 


Attr 
CODESEG 
CODESEG 
VIDEO ' 
CODESEG 


CODESEG 
CODESEG Length=0067 
CODESEG 


CODESEG 
DATASEG Length=00C8 


Para poder utilizar la información digi- 
talizada de tipo binario es conveniente reali- 
zar un tratamiento previo, con objeto de redu- 
cir en lo posible el ruido causado en la digita- 
lización por las imperfecciones del sistema. 
Un proceso elemental de imágenes es posible 
en el ordenador personal, que permita la ex- 
tracción de la información contenida en las 
partes más importantes. Mediante promedia- 
do por zonas, diferenciación entre imágenes y 
cambios de contraste pueden generarse pan- 
tallas que presenten de forma más útil que con 
letras la información de interés para el usuario. 


APRENDER CON EL ORDENADOR 


- Estudio de las energías: 
energía potencial y cinética 


UANDO se aplica una fuer- 
za para mover un cuerpo de 
un punto a otro, alo largo de 
un espacio, se realiza un tra- 
bajo. Para medirlo se utiliza 
la fórmula: 


T=F+e (T=Newtons - me- 
tro = N - m = JULIOS) 

l. Energía y energía mecánica 

Al hablar de si un sistema es capaz 
o no de realizar un trabajo, estamos indicando 
con ello si ese sistema tiene o no energía. Con- 
siderando este punto de vista, la energía pue- 
de definirse como la capacidad que tiene un 
sistema para producir trabajo, 

Sólo hay energía mecánica, que, a su 
vez, se divide en energía potencial y en ener- 
gía cinética. Con frecuencia se habla de ener- 
gía térmica, energía eléctrica, energía quími- 
Ca... pero todas estas energías no son más que 
formas de la energía mecánica, ya que al ana- 
lizarlas en su aspecto microfísico, es decir, 
preocupándonos del mundo de las partículas 
que componen los sistemas, todas estas ener- 
gías provienen de las energías mecánicas de 
dichas partículas. 

Toda energía, por su trabajo acumula- 
do, se mide en Julios (J). 


2. Energía potencial 


Todo sistema situado a una cierta altura 
tiene capacidad para realizar trabajo; así 
ocurre con el agua almacenada en un panta- 
no. A este tipo de energía, que tiene almace- 
nado un sistema debido a que se encuentra a 
una cierta altura, se le llama energía potencial. 

La energía potencial de un sistema se li- 
bera cuando se le deja a éste que descienda 
toda o parte de su altura. 
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Un sistema no tiene una energía poten- 
cial determinada, sino que ésta depende del 
plano de referencia que se considere. Así un 
globo aerostático tiene diferente energía con 
respecto a la cumbre de una montaña que con 
respecto al nivel del mar. 

Para calcular la energía potencial Ep 
que tiene un cuerpo de masa mm, situada a una 
altura h, hay que calcular el trabajo que nos 
costará llevarlo a dicha altura. La fuerza que 
habrá que hacer será igual al peso, P =m: 9, 
y el espacio recorrido será la altura h. Por con- 
siguiente: 


T=Ep=F:e =m-+g-*h (g= 9,8 m/s?) 


3. Energía cinética 

Todo cuerpo o sistema, que tiene una 
velocidad, tiene almacenada una energía y, 
por tanto, es capaz de realizar un trabajo. Un 
balón inmóvil no es capaz de romper un cris- 
tal, pero si se le lanza a una elevada velocidad 
contra él, sí lo rompería. 

Para calcular la energía cinética alma- 
cenada en un sistema de masa m a causa de 
su velocidad v, vamos a dar al sistema un tra- 
bajo, que quedará en él en forma de energía 
cinética. Al aplicarle una fuerza F el sistema 
se acelera, recorriendo un espacio 
e=1/2+a-t?. Por consiguiente, el trabajo 
dado será: 


T=P-e=m+:a*(1/2:a-t?)=1/2.m-(a+t)?=1/2.m+v? 


En el movimiento producido por F se 
supone que no hay espacio inicial e', ni velo- 
cidad inicial v', con lo que las ecuaciones del 
movimiento uniformemente acelerado quedan 
reducidas así: 


e=1/2:a-t; 


Según la expresión obtenida, la energía 
cinética tiene como fórmula: 


Ec = 1/2-m: v? 


v=a*t 
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DO REM ORO lOOIO RIOR 
12 REM X X 
15 REM x ESTUDIO DE LA ENERGIA * 
20 REM Ox * 
25 REM OK POTENCIAL Y DE LA xk 
30 REM Ox y 
35 REMO. ENERGIA CINETICA. * 
40 REM Y * 
YES RE OMOOICOIOIOIOOROOIOOODOOOIDIOION 


'50'0LS 

Sí PRINT: PRINT 

60 PRINT BE IENERSIARA 

VAVFRIENTO TABLA 1 

TO PRINT :PRINT 

80 FRINT TAB(3)3"FUEDE CUNSiDERARSE UUE. LA ENER" 
70 PRINT- "GIA ES LA CAFPACIDAL QUE |I1ENE UN" 

100 PRINT “SISTEMA PARA PRODUCIR 1RABAJO. * 

102 FOR I=1 TO 9003 NEXT" 1 

"105 PRINT 

110 PRINT TAB(3)3 "SOLO HAY ENERGIA MECANICA QUE" 
120 PRINT "A SU VEZ SE DIVIDE EN: " 

130 PRINT:PRINT TAB(3)5"14.- ENERGIA POTENCIAL." 
140 PRINT :PRINT TAB(3)3"2.- ENERGIA CINEILCA." 
143 FOR l=1, 10 950: NEXT 1 

150 PRIMT ¿PRINT:PRINT ¿PRINT 

160 PRINMT TAB(3)5 "PARA CONOCER CADA UNA DE ESTAS" 
170 PRIMT "ENERGIAS: " 

173 PRINT 

180 INPUT. "PULSA LA OPCION DESEADA 11-2)"54 
1906 ON A 6010 300,800 

00 REM OOOO IOJOIOIOIOIO E 

202 REM X EDICION DE FIN DE * 

204 REMX PROGRAMA *x 

BDO REM OOOO OOOO ORIO 

210 CLS 

220 PRINT ¿PRINT <PRINT ¿FRINT :¿PRINT 

230 PRINT "DESEAS CONOCER OTROS VALGRES DE" 
240 FRINT "ENERGIAS (S5/N);%3 

“30 INPUT desb 

260 IF KB="5" OR Kg="5" THEN 6010 Só 

279 1F Ks$<>"N" AND K$<>%n" THEN GOTO 210 

2680 CLS: PRINT O¿FRINT ¿PRINT :¿FPRINT . 


¿85 PRINT :PRINT TAB(10)3"ii1 ADIOS 11!" 
290 FOR 1=1 TO 2000: NEXT 1:CLS 
295 END 


300 REM aa OSO Il IS OIO OO 
302 REM *X ESTUDIO DE LA ENERGIA * 
304 REMX POTENCIAL. k 
GO REM ROO OOOO ROO IOIOIOR 
310 CLS 
320 FRINT :¿PRINT TAB(9)3 "ENERGIA POTENCIAL" 
$50 PRINTTOB (90m parra 
340 PRINT ; 
350 PRINT TAB(3)3"ES LA ENERGIA QUE TIENE AL" 
360 PRINT "MACENADO UN SISTEMA DEBIDO A " 
370 PRINT "QUE SE ENCUENTRA A UNA CIERTA" 
360 PRINT "ALTURA <h>." 
385 FOR I=1 TO 1500: NEXT 1 , 
á 390 FRINT +PRINT TAB(3);"SE LIBERA CUANDO SE DEJA A" 
Sp 400 PRINT "ESTE QUE DESCIENDA TODA U PAR" 
410 PRINT "TE DE SU ALTURA <h>." 
420 FOR I=1 TO 1500: MEXT 1 : 
425 PRINT - 
430 PRINT TAB(3): "PARA CALCULAR SU VALOR ES NE" 
440 PRINT "CESARIO DETERMINAR EL TRABAJO" 
450 PRINT "QUE NUS CUSIAKA LLEVAR EL CUER" 
460 FRINT "PO DE MASA <m> A DICHA ALTURA." 
465 FOR I=1 TO 1500:NEXT 1 
470 PRINT:PRINT "POR TANTO: " 


480 PRINT ¿PRINT TAB(5)3"Ep = m.g.h «JULIOS)" 

482 FOR 1=1 TO 1500: NEXT 1 

485 PRINT L 4 

490 PRINT : INFUT "(PULSA UNA IECLA PARA CONTINUAR) "Ps 
300 CELS '. 


520 PRINT TAB(3)5 "DETERMINACIÓN DEL VALUR DE" 
330 PRINT "LA ENERGIA POTENCIAL: " 

535. FOR I=1 TO 900: NEXT 1 

540 PRINT¿PRINT 

545 LET 6=9.8 

550 PRIMT "MASA <m> DEL CUEKEO, “ 

552 PRINT TABI3)3 "EN kgr"; 

554 INPUT MM 
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PRINT 


FRAN “ALTURA:<h% 4 La uUE vd 


PRINT- "ENCUENTRA DiuHo CUERO," 


3 FRINT O TABIS) ; “EN MEIRKOS mm. 


INPUT OH 

FRINI 

PRINT "ACELERACIÓN: De La GRAVE" 

PRINT "DAD: 9 = %.8B m/s2."“ 
PRINTO<PRINT :FRIMI 

FOR 1=1 TO 10002 MEXS 4 

FPRINT 1AB(3)5"LA ENERGIA PONENCIAL Le» 


2 FPRINIL "DICHO CUERPO ES: * 


LET E=MxGxH 
FPRINT ¿PRINT TAB(6)5 "Ep = Ej JULI 
PRINT 2 FRINT 


> FOR I=1 TO 2000: MEX 1 li , 
2 INPUT. y (PULSA UNA TELLA PÁRA CONTINUA ro +4 


GUTO 210. AY 
REM e dd doble FI 
pal x ESTODIO DE LA ENEROLA 


A 
PREM: va Codo NET UA 
4 


BEN IMA IA 


PRINT ¿ERINT TAB (7) 5 "ENERGÍA CINE LLL 

PRINT TAB(9)3 "=== A ” 

PRINT y 

PRINT TAB(3)5"ES LA ENERGIA QUE TIENE AL» 

PRINT “MACENADD UN SISTEMA DEBIDO A" 

FRINT "QUE LLEVA UNA DETERMINADA VELO" 

PRINT “CIDAD: <v>." 

FOR I=1 TO 1500: NEX1 1 
PRINT +PRINT O TAB(3); "PARA CALCULAR La ENERGIA Lio 
PRINT "NETICA, Ec, ALMACENADA EN UN * 

PRINI "SISTEMA DE MASA ¿m> A CAUSA De" 

PRINT. "SU VELOCIDAD, <v>, HAY QUE Cal 

PRINT "CULAR EL TRABAJO QUE HEMOS DAL» 

PRINT "AL SISTEMA FORA QUE ALCANCE pi" 

FRINT "CHA VELOCIDAD, * 

FOR I=1 TO 2500: NEXT 1 

PRINT :+PRINT TAB(3)5"AL APLICARLE UNA FUERZA, E,0 
PRINT "EL SISTEMA SE ACELERA, LON LG" 

FRINT "QUE RECORRE UN ESPACIO, e." 

PRINT :PRINT :PRINT 

FOR I=1 TO 3000:NEXT 1; 

INPUT "(PULSA UNA TECLA PARÁ CONTINUAR) "¿Pg 

CLS ; 
PRINT :PRINT :PRINT TAB(3)5"POR TANTO, EL TRABAJO DADO" 


1000 PRINT "DADO ES: 


PRINT O3PRINT O" = Fe = 1/2. m.v2" 

FOR I=1 10. 1/06: MNEXI 4 

PRINT ¿PRINI 2 ERiINI Tabasi5 "La ENERGIA CINETICA NIENE" 
PRINT "FOR FORMULA ENTONCES» " 

PRINT O¿PRINT “Ec = 1/2.m.v2 MULIOS)” 

FOR 1=1 TO 1500: NEXT 1 

PRINT :¿PRINT 


) PRINT "DONDE TENEMOS QUE: " 


PRINT ¿PRINT 1AB(3)5"Ecz ENERGIA CINETICA" 
FRINT TAB(3)53" mi MASA DEL CUERPO EN Kg." 
PRINT TAB(3)5"y2:2 VELOCIDAD DEL CUERPO.“ 
PRINT :¿PRINTIPRINT :PRINT 

FOR I=1 TO 2000: NEXI 1 

INPUT "(PFULSA UNA VECLA PARA CON LNUARO UF 
CLS 


PRINT:PRINT TAB(3)5 "DETERMINACIÓN DEL VALOR DE" 


Y) PRINT "LA ENERGIA CINETICA: " 


FOR I=1 TO 900: NEXT 1 


1170 PRINT :PRINT 
1180 PRINT "MASA <m> DEL CUERPO, " 
1190 PRINT TAB(3)3 "EN Kg: "3 


INPUT mM 


1210 PRINT:PRINT 
1220 PRINT "VELOCIDAD <v+ QUE LLEVA" 
1230 PRINT "DICHO CUÉRPO, EN m/s2:"; 


INPUT Y 


1250 PRINT:PRINT ¿PRINT :¿PRINT 

1270 PRINT TAB(3)3"LA ENERGIA CINETICA DE" 

1280 PRINT "DICHO CUERPO ES: " 

1290 LET C=1/2xMx (VxV) ; 

1300 PRINT ¿PRINT TAB(6); "Ep ="3U; “JULIOS. " 

1310 PRINT. :PRINT:PRINT 

1320 FOR I=1 TO 2000: NEXY 1 4 
1530 INPUT (PULSA UNA TECLA PARA CONTINUAR) 05E% 
1340 GOTO 210 : 
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Modificaciones para otros equipos 
Tienes que realizar las modificaciones 
siguientes según tu ordenador: 


ZX-SPECTRUM 
190 IF A = 1 THEN GOTO 300 IFA =A 
THEN GOTO 300 
194 IF A = 2 THEN GOTO 800 IFA =A 
THEN GOTO 800 
196 CLS: GOTO 105 
295 GOTO 9999 


COMMODORE 
50 PRINT CHR$ (147) 
210 PRINT CHR$ (147) 
280 PRINT CHR$ (147) 
290 FOR I = 1 TO 2000: NEXT 1: PRINT 
CHR$ (147) 
310 PRINT CHR$ (147) 
500 PRINT CHR$ (147) 
810 PRINT CHR$ (147) 
988 PRINT CHR$ (147) 
1130 PRINT CHR$ (147) 


MATEMATICAS 


y Distancias en el espacio afin 
euclídeo (y II) 


Como recordarás, con anterioridad ya 
se ha estudiado, en otro capítulo, el concepto 
de distancia en el espacio afín euclídeo (espa- 
cio afín real cuyo espacio vectorial es euclí- 
deo). El estudio se centró en determinar el va- 
lor de las distancias para tres casos: 


— Distancia existente entre dos puntos, 
PS Y <>, 

— Distancia entre un punto, <P>, y 
una recta, <r>. 

— Distancia entre dos rectas, <r> y 
<S>. 


En este apartado continuaremos con 
distancias, pero introduciendo conceptos nue- 
vos. Ante todo, lo primero es definir el con- 
cepto de PLANO en el espacio afín euclídeo: 


n= (x e E(3) /x=P (a -ú + B -v), con P fijo 
(1%, v) independientes, ya B 2R) 


Consecuentemente, es posible llegar a 
calcular nuevos valores para las distancias: 


— Distancia de un punto, P, a un plano, 
A: 

— Distancia de una recta, <r>, a un 
plano <n>. 


- 


— Distancia entre dos planos, <n> y 
<0>., 


1. Distancia de un punto a un plano 

La distancia de un punto a un plano 
n= Ax + By + Cz + D =0, viene dada, geo- 
métricamente, por la perpendicular desde el 
punto P exterior que corte a un punto del 
plano <n>; la distancia entre ambos puntos 
es la que buscamos. 

Se determina calculando el producto 
escalar del vector PP, y el vector unitario n' 
que tenga la misma dirección que el vector 
asociado al plano n (A, B, C). 

El vector unitario n' se obtiene dividien- 
do las componentes del vector asociado por el 
módulo del mismo: 


E O 
2 IT TaT Tal 


De donde la distancia del punto P (Xl, 
Y1, Z1) al plano <n> es: 
d (Pm =PP+" = | pp |»| pl+cos a= | Pp + 
cos a (ya que l py' | = 1) 
Expresando el producto escalar en fun- 


ción de las componentes de los vectores obte- 
nemos: 


aro 00-04 : ver TH) 
A 3 c 
A FUE TA (21 -Z)- TaT E 


—_-)+B (MI Y) + (21-2) 
v (A+ BF4 05 
APXI+B:YI+C:21-A+X-BeY-C:2 0 
LETS 
Como P es un punto del plano <n), sa- 
tisface la ecuación, con lo cual: 
Ax +By+CUz2+D=0-—0D = Ax + By + Cz 
sustituyendo en [1] resulta: 


y m_AX]l+BYl+C0Z1+D 
a (P',m) ACER [2] 
Cuando la distancia que se busca es la 


del origen de coordenadas O (0, 0, 0) al plano 
<n>, la fórmula [2] queda: 


00m —A-0+B:0+G:04D__ D 
j V(A + Bi 05 V(A+B 4 C* 


2. Distancia entre recta y plano 


La distancia entre recta y plano se ob- 
tiene calculando la distancia entre la recta 


<r> y un punto P que pertenezca al plano. 
Su valor viene dado por el módulo del produc- 
to vectorial del vector PP (X1 - X, Yl - X, 
Z1 - Z) y el vector unitario v que tenga la mis- 
ma dirección que el vector director de la rec- 
ta, v (a, b, C). 


pea b e, 
ARA AA 
Y la distancia viene determinada por: 


ld (PP*, v) =1 PP*] - | w|. sena= | PP'-sen 
a (ya que | w'| =1) 


Expresada en función de las compo 
tes de los vectores: 


a E al ol VGA 
iS V (a? + b*+c*) V (at +b*+ 0% V(*+b*+ 0% 


3. Distancia entre planos 

Sería la distancia de un punto cualquie- 
ra de uno de ellos al otro plano. Se reduce en- 
tonces al primer caso (distancia de un punto a 


UN 
10 


yy . 
0) y 
Y 
Ñ Ay 
h Mv) 
5 A 
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A ll 
! A 
AN EN 
e 
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600 PRINT ¿PRINT O2PRINT ÍPRINT ¿PRINT 
610 FRINT TAB(C3)¿"LA DISTANCIA ENTRE EL PUNTO <p>" 
615 FRINT "FERTENECIENTE. AL PLANO <w> RES" 
620 PRINT "PECTO DE LA RECTA. <r> ES:" 
630 PRINT :PRINI lAB(/)3D; "UNIDADES. 
635 PRINT ¿FRINT :PRINT :PRINI 
640: FOR I=1 TO 2000: NEXT 1 
650 PRINT :¿PRINT O:PRINT :PRINT 
660 INFUT "(FULSA UNA TECLA FARA CONTIMNUARI "ps 
670 GOTO 220 
GOO REM ROO OROOIOIOIOROIOIOIO OOOO Ak 
902 REM-k DISTANCIA DE UN PUNTO * 
7904 REM k A UN PLANO <w> * 
ID REM AOS 
910. CELS 
920 GOSUB 2000 
930 GOSUE 2800 
540 LET P=A1XXO+B1XYO+C01xZ0+D1 
950 LET D=ABS (P/N1) 
7960 CELS 
970 PRINT ¿PRINT ¿PRINVO¿ERINT O:3PRiNI 
780 FRINT TAB(3)5"LA DISTANCIA DEL PUMID <p> AL PLA" 
9790 FRINT "NO <>: ES: 
1000 PRINT ¿PRINT TAB(7)3Lb3 “UNIDADES. " 
1010 PRINT 2FPRINT O ¿PRINT <PRINT 
1015 FOR I=1 YO 2006: NEXT A 
1018 PRIMT ¿PRINT ¿PRINV 2 PRINT 
1020. INFUT "(PULSA UNA TECLA PARA O e 
1030 GOTO 220 
1100 REM MODO DROIOO ISO IO DR IOROIOIO ok 
1110 REM *k DISTANCIA ENTRE PLAMOS * 
1120 REM RRSIOROOIOIOIOIOIOIORIGIOIOIOOIOIOIOIOIOR 
1130.ELS 
1140 GOSUB 2800 
1150 SOSUB 3000 
1160 LET Ul=B1ACZ-CIAB2 
1170 LET U2=C1xA2-A1XC2 
1150 LET US=A1xBZ2-B1XAZ 
1190 LET M=SOR (UI KI +UZRLZ HUIR US) 
1200 1F M=0 THEN GOTO 1300 
1210 CLS 
1220 PRINT ¿PRINTO:PRINT ¿PRINT :FRINT 
1230 PRINT TAB(3)5"LA DISTANCIA ENTRE LUS DUS FLA: 
1240 PRINT "MOS ES CERO, YA QUE SON SECANTES. " 
1250 PRINT ¿PRINT ¿ERINT :PRINT 
1260 FOR I=1 TO 20001 NEXT 1 
1265 FRINT ¿PRINTO:+PRINT 3PRINT 
1270 INPUT "(PULSA UNA TECLA PARA CON ViNGAR sc 
1280 GOTO 220 
1300 REM xo CASO DE PLANOS PARALELOS xk 
1310 LET D=ABS((D1/N1)-(D2/N:2))-. 
1320 PRINT ¿PRINT :PRINT :PRINI :PRIN] 
1330 PRINT TAB(3)5"LOS DOS PLANGUS SUN FARBLELDS" 
1340 FRINT "Y LA DISTANCIA ENTRE ELLOS Es" 
1350 PRINT :PRINT TAB(7)3D3 "UNIDADES. " 
1360 PRINT+*+PRINT 2PRINT ¿PRINI 
1370 FOR 1=1 TO 2000: NEXT 1 
a 1375 PRINT :PRINT ¿PRINT :PR1N1 
1380 INPUT "(PULSA UNA TECLA FARA COM INUARO "sr 
1390 GOTO 220 
2000 REM OOOO OOOO OI IO A 


2002 REM »* COORDENADAS DEL A 
2004 REM k , PUNTO, <p>. * 
2006 REM JR ROROLDAODDRaOAORIaOnoo 
2010 CLS 


2020 PRINT PRINT GPRINT ¿PRINT :FRINT 
2030 PRINT "COORDENADAS DEL FUNTO p:" 
2040 PRINT "p(X0,YO, ZO)"; 

2050. INFUT X0,YO,ZO 

2060 RETURN 

2400 REM aaa IOIOIOIOIOIOlOIOIOIOOK 
2402 REM * COORDENADAS DEL VECTOR x* 


2404 REM k DIRECTOR <v> DE k 
2406 REM X* LA RECTA, <r>. eS 
2408 REM ORO lll IElOjOIOlaIIOJOJÓR: 
2410 CLS 


2420 PRINT :PRINT ¿PRINT ¿PRINT 

2430 PRINT "COORDENADAS DEL VECTOR DIRECTOR” 
2440 PRINT ."DE LA RECTA <r>." 

2450 INPUT "y(V1,V2,V3)"3V1,V2,V3 

2460 LET N1=SOR (VIXV1+V2ZAV2Z+VIAV3) 

2470 PRINT ¿PRINT :PRINT : 

2480 FRINT "COORDENADAS DE UN PUNTO PERTENE” 
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2470 
2500 
2010 
2800 
20802 
2804 
2810 
2815 
2820 
2830 
2840 
2043 


RETURN 
REM xk 


CLs 
FRINT 2PRINT 


PRINT *CION:" 


¿PRIMI 
PRINT TAB(3)5 "EL PLANO <> TIENE DE ECU 


2 » 3 > 
A EE EY, ES A 


PRINVO “CIENTE A LA RECTA <rs.* 
INPUT "PUNTO t:"3X1,Y1,Z1- 


REM OOOO lio 
' DATOS DEL PLANO <> * 
REM OIOOOIOO OO OIOOIOIOOIOIOIO OCIO 


¿ERINT 


PRINT ¿PRINT TAB() "Ax + By + UCz + D 
FOR I=1 TO 8007 NEXT 1 


pr 


2850 PRINT ¿PRINT “DONDE <A,B,C> SUN LAS COUR” 
2860 FRINT "DENADAS DE SU VECTOR NORMAL.“ 


2865 
2670 
287% 
2880 
2890 
2900 
¿910 
3000 
5002 
3004 
3010 
3015 
3020 
3050 
3040 
3045 
3050 
3060 
3065 
3070 
3075 
3080 
3070 
3100 
3110 


PRINT 


PRINT “mt(AasBD)0 
INPUT A1,B1,C1 


RETURN 
REM o 


ELS 
PRINT ¿PRINT 


PRINT "CION:" 


PRINT 
PRINT 


INPUT A2,B2,02 


RETURN 


Modificaciones para otros equipos 


ZX-SPECTRUM 


210 IF Z = 1 THEN GOTO 900 IFZ = 1 
THEN GOTO 900 

212 IF Z = 2 THEN GOTO 500 IFZ = 2 
THEN GOTO 500 

214 IF Z = 3 THEN GOTO 1100 IFZ = 3 
THEN GOTO 110 

216 CLS: GOTO 166 

290 GOTO 9999 


COMMODORE 

45 PRINT CHR$ (147) 
220 PRINT CHR$ (147) 
260 PRINT CHR$ (147) 
280 PRINT CHR$ (147) 
510 PRINT CHR$ (147) 
590 PRINT CHR$ (147) 
910 PRINT CHR$ (147) 
960 PRINT CHR$ (147) 
1130 PRINT CHR$ (147) 
1210 PRINT CHR$ (147) 
2010 PRINT CHR$ (147) 
2410 PRINT CHR$ (147) 
2810 PRINT CHR$ (147) 
3010 PRINT CHR$ (147) 


¿PRINT 
PRINT "TAR(3)5 "EL PLANO <> TIENE DE ECUA" 


FOR .I=1 TO 800: NEXT 1 


LET Ni=SUR(ALAAL+BLAB1+CIACL) 


PRINT "COORDENADAS DEL WECTUR NORMAL" 


REMO IOOIOIOOROOOIOIOIOIOOIOO. 
DATOS DEL FLANO sr k 
REM MIO OOOO ODIO 


¿PRINT 


PRINT ¿PRINT OTAB(S) ¿"Ax +B y e 0z + D* 
FOR I=1 TO 800: NEXT 1 

PRINT :FRINT "DONDE <A*,E*,C*2 SON LAS” 
PRINT "COORDENADAS DE SU VECTOR NORMAL." 
FOR l=1 TU 800 NEXT 1 


45 


= 0" 


"COORDENADAS DEL VECTOR NORMAL" 
PRINTm* (A*,B*,07)%; 


LET N2=SUR(AZLAA2+B2KXB2FO2XC2) 


El arte en la España musulmana 


La manifestación más importante del arte 
hispanomusulmán es la arquitectura. En su 
evolución se distinguen tres períodos: el cor- 
dobés o califal (siglos VIII al X); el de los Rei- 
nos de Taifas, almorávide y almohade (siglo XI 
a mediados del XIII) y el granadino o nazarí 
(siglos XIII al XV). 

Primer período (cordobés o califal). En- 
tre sus elementos arquitectónicos destaca el 
arco de herradura, más peraltado que el visi- 
godo, del cual procede. En estos arcos alter- 
nan dovelas blancas y rojas, según el proce- 
dimiento utilizado ya por los romanos en el 
acueducto de los Milagros de Mérida. Emplea 
otros tipos de arcos, como el de lóbulos, el de 
herradura apuntado y los arcos entrelazados. 
El arco va encuadrado por un alfiz, que deja 
en la parte superior unos triángulos esféricos 
denominados albanegas. La arquitectura cali- 
fal utiliza todos los sistemas de bóvedas cono- 
cidos, siendo la más característica la llamada 
bóveda califal, formada por gruesos nervios 
que no se cruzan en su centro. La decoración 
es de ataurique (ornamentación de tipo vege- 
tal) y geométrica, todavía muy simple a base 
de cuadrados y de rectángulos. Las dos obras 
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más importantes son la Mezquita de Córdoba 
y el Palacio de Medina Azahara. 

— Mezquita de Córdoba. Construida 
entre los siglos VIII y XI, y en sus diversas am- 
pliaciones intervinieron Abderramán 1, II y III, 
Alhaquén II y Almanzor. Es de planta rectan- 
gular, con diecinueve naves separadas por co- 
lumnas muy variadas, aprovechadas muchas 
de ellas de iglesias cristianas. Sobre la colum- 
na se eleva un pilar y ambos sostienen dos ar- 
cos superpuestos, el superior de medio punto 
y el inferior de herradura, ambos con alter- 
nancia de color en las dovelas. La parte más 
lujosa de la mezquita es el mihrab, realizado 
por Alhaquén II. 

— Palacio de Medina Azahara. Situado 
a pocos kilómetros de Córdoba, fue mandado 
construir por Abderramán lll para su favorita 
Zahara y completado por Alhaquén II. 

Segundo período (Reinos de Taifas, al- 
morávide y almohade). A partir de 1031, al de- 
sintegrarse el Califato de Córdoba, el arte 
continuó desarrollándose en los reinos de Tai- 
fas. El edificio más importante de este perío- 
do es el palacio de la Aljafería de Zaragoza, 
construido por los Beni Hud en el siglo XI. Se 
caracteriza por su gran riqueza decorativa, el 
alargamiento del capital y el arco mixtilíneo. 
La invasión almohade supuso una reacción 
contra la lujosa decoración de los reinos de 
Taifas e introdujo una serie de novedades ar- 
quitectónicas, como la decoración a base de 
listeles paralelos. Al arte almohade pertene- 
cen la Giralda de Sevilla, que era el alminar 
de la antigua mezquita, y la Torre del Oro, 

Tercer período (granadino o nazarí). 
Granada fue la capital y residencia de los re- 
yes nazaríes desde mayo de 1238 hasta enero 
de 1492. Los reyes nazaríes Mohamed I, Yusuf 
1 y Mohamed V levantaron los tres palacios 
que constituyen el conjunto principal de la Al- 
hambra: el Mexuar o Cuarto Dorado (Justicia); 


el Serrallo o cuarto de Comares (Palacio ofi- 
cial); y el Harem o Cuarto de los Leones (Pa- 
lacio privado). Aunque cada uno de estos pa- 
lacios tienen en común un patio con fuentes o 
alberca en su centro, sin embargo, se diferen- 
cian entre sí notablemente, ya que mientras el 
de Comares es típicamente musulmán, el de 
los Leones tendría influencias cristianas, ase- 
mejándose a un claustro románico. La arqui- 
tectura civil nazarí es frágil y en ella predo- 
mina lo decorativo frente a lo constructivo, Los 
maravillosos arcos que adornan los patios y sa- 
lones no sostienen en realidad nada, Los pala- 
cios granadinos más que edificios constituyen 
espléndidos conjuntos escenográficos. Se uti- 
lizan diversos tipos de arcos, siendo el más ori- 
ginal el arco de pabellón. Tiene una profusa 
decoración a base de alicatados (especie de 
mosaico en que cada elemento decorativo es 
una pieza independiente de barro vidriado), 
atauriques, lacerías (decoración geométrica 
compuesta por líneas o cintas que se entrela- 
zan formando polígonos o estrellas ordenados 
simétricamente) y ajaracas (ornamentación 
compuesta de ataurique y lacerías). Las nume- 
rosas columnas de sus patios ofrecen múltiples 
puntos de vista y magníficos juegos de pers- 
pectiva. Es extraordinaria la fusión del arte 
con la naturaleza por medio de fuentes y sur- 
tidores, albercas rodeadas de arrayanes y 
frondosos jardines. 

— El Generalife. Fue una de las fincas 
de recreo de los reyes nazaríes que se en- 
cuentra situado muy próximo a la Alhambra. 
Constituye, en realidad, el mejor ejemplar de 
jardín árabe medieval que se conoce en la ac- 
tualidad. El Generalife sorprende no tanto por 
sus construcciones, como por la belleza de los 
jardines y por los juegos de agua de las fuen- 
tes, como las del patio de la alberca. Era un pa- 
lacio mirador: sencillo y con escasos aposen- 
tos. 


10 REMOJO IO OOOO OOO ORIO JO 
15 REM Xx [CONOCIMIENTOS SOBRE ARTE %* 


20 REM x 


40 LET A=0 


50 RANDOMIZE TIMER 


HISPANO=MUSULMAN * * 
qeria IO IOIOIOIOIOIIOOIOIOOIDIOOR 


60 DIM A$(10): DIM B$(40) : DIM Nc10) 
TO REM RIOR ROO RIOR OOOO 


75 REM * 


LECTURA DE FREGUNTAS k 


BO RE ORO OROOIOIOIOODIOIOIOOK 


90 FOR I=1 TO 10 
100 READ A$(1) 
110 NEXT 1 


120 
123 
130 
140 


REM AOIOOIORIDIOOIOOIOJOR 
REM k LECTURA DE RESPUESTAS A 
REM III 
FOR J=1 TO 40 
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150 READ E+$(J) 

160 NEXT 0 

17 REMO OOOO 
173 REM k LECTURA DE SOLUCIONES * 
180 REM X ...0,/LAS RESPUESTAS —* 
185 REM ORO RE 
190 FOR K=1 TO 10 

195 READ N(Kk) 

200 NEXT KE 

210 REM Joa ld lalala 
215. REM k EDICION EN PANTALLA DE x 
220 REM + PREGUNTAS Y RESPUESTAS * 
PES REM OOOO RO OOOO 
230 FOR I=1 TU 10 

240 PRINTIPRINT TAB (2) 3As(1) 

250 FRINT:PRINT 

260 FRINTSPRINT  TABL6) Bo (14-30 
270 PRINT:FRINT TAB(6)¡Eé(1H4—2) 
Z80 FRINT¡PRINT TAB(Ó)3B$(1k4-1) 
290 PRINTIPRINT TAB(6)B4 (14) 

300 FRINT:PRIMT 

3100 REM OOOO lo toÓloojok 

315 REM * INTRODUCCIÓN DE LA * 

320 REM k SOLUCIÓN CORRECTA * 

328 REM ROO ORIO IGIOIOIO ROO OO 

330 INPUT “LA RESPUESTA ES: “R 
340 1F R=NCI) THEN GOSUB 500 

350 IE RN) VHEN GOSU£ 800 

360 NEXT 1 

370 PRINTS PRINT: PRINT 

BO REM RARO OO DIONIOIORIOE KR 
385 REM RX EDICIÓN DEL I:IN DEL 


390 REM k TS 
398. REM Ad IOIOIII  ao 
400 FRINT TAB(Z);"RESPL 0 TS COREECIAS: "yA 


410 FRINT¿PRINT:PRINi 
415 1F AX1 OR A>10. Tbliol 


420 1 Ar=1 AND Ax4 THEN: VEFICIENTE":GUIO 4%0 
430 1F A=4 THEN PRINT "1Nsu Ma 490 
440 1 A=5 THEN FRINT "SUFICL. ELO] 


450.1 A=6 THEM PRIMT "BIEN "¿601L 

460 1F A>6 AND AY. THEN PRINT "NÓTebio. dUTO 490 
470 18 A59 THEN PRINT "SOBRESALIENTE": 6010 490 Y 
480 PRINT "MUY BIEN, PERFECTO. TIEMES UN 10 DE NOTA" 
490 FOR 1=1 TO 2000:MEXT 1: ÉLS+END 

DO OREM O loko lo alto dor 

BOS REM 4 SUBRUTINA DE RESPUESTAS * 


510 REM Xx, CORRECTAS k 
515 REM JOAO ROPA 
520 ELS i 


530 PRINT: PRINT:PRINT 

540 PRINT-" ¡SOLUCION CORRECTA!" 
550 LET A=4+1 , 

560 FOR F=0 TO 2000:NEXT F:CLS 

570 RETURN 

800 REM JO OOOO ISSO IOIOOIOIOIOIOK 
905 REM k SUBRUTINA DE RESPUESTAS xk 


810 REM * INCORRECTAS. * 
8135 REMORROIODOOIOOOIOÍO O OIIOROJOORIOIOIIOL 
820 CLS 


930 PRINT:PRINT: PRINT, 

840 PRINT " ¡NÓ ES CORRECTO!" 

850 PRINT:PRINT Ape: 

860 PRINT "LA SOLUCION CORRECTA ES: " 

865 PRINT:PRINT BS (1kx4+NC1)-4) 

870 FOR F=1 TO 5000: NEXT F:CLS 

880 RETURN ,,+. 

1000 REM Jada Odo IDOLO 

1010 REM Xx DATAS CON LAS PREGUNTAS x 

1020 REM X RESPUESTAS Y CON LAS xy 

1030 REM *X SOLUCIONES CORRECTAS k 

1040. REM aaa RI III RIA 

1050 DATA "FERIODOS DE LA ARQUITECTURA HISPANOMUSULMANA: !, "A. QUE PERIODO PERTENE 
CE LA GIRALDA DE SEVILLA", "OBRA DEL PERIODO: CORDOBES 0 CALIFAL". 

1040 DATA “LA MEZQUITA DE CORDOBA ES DEL PERIODO. ..". "QUE PERTENECE A LA ALHAMBR 
A DE GRANADA: ", "QUIEN PARTICIPO EN La AMPLIACION DE La MEZAUITA DE CORDOBA". 

1070 DATA “LA ALJAFERIA DE ZARAGOZA A QUE PERIODO PERTENECE: ", “COMO EJEMPLAR DE 
JARDIN ARABE MEDIEVAL DESTACA: " 

1980 DATA. "LA DECORACION DE ALICATADOS, ATAURIQUES, LACERIAS Y AJARACAS ESTA PRE 
SENTE SOBRE TODO EN:","0UE ELEMENTO ARQUITECTÓNICO DESTACA DEL PERIODO CORDOBES: 
$“ 


1090 DATA "1. CORDOBES, MOZARABE, MUDEJAR”, "2. CORDOBES, TAIFAS, NAZARI", "3. TAI 
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FAS, NAZARL, MOZARABE","4. NAZARI, 


ALFAS, MULEJAR" 


1100 DATA "1. DORDOBES","2. MUDEJAR","Z. NAZAR","4. ALMOHADE","1. PALACIÓ DE MEL 
INA AZZAMARA", "2. GENERALIFE",'"3. TORRE DEL ORO”, "4. ALHAMBRA DE GRANADA" 

1110 DATA "1. GRANADINO","2. TAIFAS", "3. CORDOBES O CALIFAL","4. ALMOHADE”", "1. € 
-IRALDA DE SEVILLA","2. ALJAFERIA"”,'"3. CUARTO DE COMARES”, "4, GENERALIFE" 

1120 DATA "1d. ALHAQUEM 11%,“2. BENI HUD","3. MOHAMED 1,4. YUSUF 1","1. NAZARI" 
, "2. GRANADINO", "3. CORDOBES O CALIFAL","4. REINOS DE TAIFAS" 

1130 DATA "1. MEXUAR*,"2. GENERALIFE", "3. TORRE: DEL ORO",“4. CUARTO DE LOS LEONE 


5,1, GENEROLIFE", "2. MEZQUITA DE CORDOBA”, "3. 


DE SEVILLA" 


1140 DATA "1. ALBANEGAS”, "2. ARCO DE HERRADURA", “3. 


URTQUES" 
; 1150 DATA 2,4,1,3,331,4,2,3,2 


Modificaciones para otros equipos 


Tienes que desarrollar las siguientes 
modificaciones según el ordenador que ten- 
gas: ; 


ZX-SPECTRUM 

50 (NO SE PONE) 

60 DIM A$ (10,40), DIM B$ (40,30), DIM 
N(10) 

490 FOR 1 = 1 TO 1000: NEXT I: CLS: 
GOTO 9999 


500 FOR F = 1 TO 1000: NEXT I: CLS 
870 FOR F = 1 TO 3000: NEXT I: CLS 
COMMODORE 


30 PRINT CHR$ (147) 

490 FOR 1 = 1 TO 2000: NEXT I: PRINT 
CHR$ (147): END 

500 FOR F = 1 TO 2000: NEXT I: PRINT 
CHR$ (147) 

870 FOR F = 1 TO 5000: NEXT I: PRINT 
CHR$ (147) 


PARA LOS MAS PEQUEÑOS 
1 División de polinomios: división en- 
tre (x - a). Regla de Ruffini 


En el anillo de los polinomios en R [x] 
es posible definir la división de polinomios. Al 
operar podemos encontrarnos con divisiones 
exactas y otras que dan resto. Estas divisiones 
se realizan como una división normal donde el 
dividendo y el divisor son dos polinomios. 

Cuando el polinomio divisor es del tipo 
(x —- a), la división se puede hacer de manera 
muy cómoda, usando la Regla de Ruffini, que 
maneja sólo coeficientes de los polinomios di- 
videndo y divisor: 

Un ejemplo sería: 

(x*- 3x2 + 2) / (x- 3); 


E 
3 3 9 18 54 
13 6 18 56 =R 
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ALHAMBRA DE GRANADA”, "4. GIRALDE 


LACERIAS Y AJARACAS", "4. ATE 


7 Regla de Ruffini 


a) El grado del cociente es menor en 
una unidad que el del dividendo. 

b) El primer coeficiente del cociente 
es el mismo que el primer coeficiente del divi- 
dendo, 

c) Los otros coeficientes se obtienen 
multiplicando el anterior por <a>, sumando 
el coeficiente correspondiente del dividendo. 

d) El resto es igual al producto del úl- 
timo coeficiente por <a>, más el término in- 
dependiente del dividendo. 


Teorema del resto. Teorema de Ruf- 
fini, Ceros de un polinomio 


A) Teorema del resto. El resto de la di- 
visión de un polinomio P (x) por (x - a) es igual 
al valor numérico del polinomio para x = a. 


PG)=(x-a):C(x)+R 
B) Teorema de Ruffini. La condición 
necesaria y suficiente para que un polinomio 
P (x) sea divisible por (x - a) es que P (a) =0. 
P (x) 
e A 
) ña 
C) Ceros de un polinomio. Se llaman 
ceros o raíces de un polinomio a los números 
reales <a> para los que su valor numérico es 

cero. Es decir: 


=P (a) =0 


a € Res cero de P (x) =P (a) =0 


Sobre el programa 

El programa que se te presenta a con- 
tinuación realiza la división de un polinomio P 
(x) entre el binomio (x - a), donde tú introdu- 
ces el grado y coeficientes del polinomio por 
un lado y además introduces el valor del tér- 
mino <a> del binomio. Al final obtienes el po- 
linomio cociente expresado por el método de 
Ruffini y donde se te indica si el resto es R = 
0o bienR <> 0, 


REM A is 


REM xk 

REM X APLICACION DE La REGLA DE k 
REM xk k 
REM-Xk-  RUEFFINI O FARA DIVIDIR A 
REM xk . * 
REM * POLINOMIO POR UN BINOMIO * 
REM xk A 
era MOI 
EL 

PRINT ¿PRINT :PRINT 


ERINT TAL(9); "REGLA DE RUEFINI" 

PRINT O TAB(9) 3 Mmm p 

PRINT ¿PRINT 

PRINT TAB(3); "ESTE PROGRAMA TE PERMITE DETER" 
FRINT "MINAR EL COCIENTE DE UN POLINOMIO" 
PRINT: "P(<) POR UN BINOMIO (xa). 


FRINT ¿PRINMT TAR: 333 "SE OBTIENE EL POLINOMIO CUCIEN: 


PRINT "TE C<x) Y EL VALOR DEL RESIO R." - 
FRINT ¡PRINT TAB(3); "LOS RESULTADUS APARECERAN SE- * 
FRINT "GUN EL ESQUEMA DE LA REGLA DE" 

PRINT "RUFFINI. 

PRINT O¿PRINTO:PRINT O: PRINTIPRINT 

FOR 1=1 TO 2000¿NEXT 1 

INPUT "(PULSA UMA TECLA PARA CONTINUAR) gis 

¡9 E=) 


310 REMO lolo lO lolo 
312 REM % INTRODUCCION DEL (GRADO * 


REM Ok DEL POLINOMIO Y DE SUS xk 

REM * COEF ICIENTES k 

REM ROOIOOO IO SIRIO OK 

FPRINT ¿PRINT 

INPUT "GRADO DEL POLINOMIO Foo: N=" NN 
DIM B(N), ECN) 

PRINT ¿PRINT 

FOR I=N TO 1 STEP -1 

PRINT "COEFICIENTE DE XX “131050 INPUT (1) 
NEXT I 

INPUT "TERMINO INDEFENDIENTE: "¿B(0) 


400 REM IO 9D0Or 


REM * VALOR DEL BINOMIO (xa) A 
REMIGIO OOOO OSORIO OOO ORIOL 
CLs 

FRINT :PRINT £PRINT 2PRINT O: PRINT 


PRINT :¿PRINT TAB(6)3 "VALOR DEL TERMINO <as DEL" 
FPRINT TAB (6) ¿ “BINOMIO (ads 

INPUT A 

CLs 


REM OOOO OOOO 


REM Ok RESULTADO DE LA DIVISION * 


REMOS IIOROROOROJOK: 

PRINT + PRINT 

FRINT TAB(3)3 "EL COCIENTE ENTRE EL POLINOMIO" 
PRINT "P(x) Y EL BINOMIO (x-a) ES: " 
FRINT3PRINT TAB(10)5 "LP (x)/(x-a) 1" 
PRINT:PRINT:¿PRINT 

LET C(N-1)=B(N). 

PRINT “COEFICIENTE DE X""5N=13"2"¿0(N-1) 


580 FOR I=N-1 TO.1.STEP -1 


CLIO RÉ (RARE) 


600 FRINT "COEFICIENTE DE X“"3 1-13: "30 (1-1) 


NEXT 1 
LET R=C(0)*A+B(0) 
FOR I=1 TO 600:NEXT 1 


640 PRINT ¿PRINT."EL RESTO DE LA DIVISION ES R=">kR 


1 Ko20 1HEN 60/U 675 

5 PRINT :PRINT 

FOR I=1 TO 1700:NEXT 1 

PRINT :¿PRINT "LA DIVISION ES EXACTA." 


3 PRINT 


PRINT "X="3A3"ES UNA RAIZ DEL POLINOMIO R(x). 
PRINT O: PRINT :FRINT 

FOR I=1 TO 2500:8NEXT 1. 

INPUT "(PULSA UNA TECLA PARA CONTINUAR) "PS 
REMOS OROIOOIOROOROPDIOIOIO Ak 

REM O EDICION EN PANTALLA DE x 

REMOX LA REGLA DE RUFFINI x 

REM ORIO ORIO 

CLs 

PRINT :PRINT O:PRINT :PRINT :PRINT 

ERINT " " 

FOR 1=N TO O STEP -1 


750 PRINT E(1)5" y 
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760 PE Y 


770 PRINTIPRINT + PRINT: : PRINT 


780 PRINT As" 0"; 

790 FOR I=N TO O STEF -1 
800 PRINT' CCA" , 
BO NEXT 0007 

820 PRINT: PRINT 
830 PRINT 
835 PRINT 
830 PRINT " 
850 FOR 
8609 PRINT CC); 
8709 NEXT-1 
880 PRINT Ri"=R” 
EGO END: 


2 


m7 
El 


Modificaciones para otros equipos 


Tienes que hacer las modificaciones si- 
guientes: 


ZX-SPECTRUM 
890 GOTO 9999 
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MIOS IOOOOIOTOIOL! 


I=N-1 yo 5 STEP an 


COMMODORE 
50 PRINT CHR$ (147) 
300 PRINT CHR$ (147) 
420 PRINT CHR$ (147) 
460 PRINT CHR$ (147) 
720 PRINT CHR$ (147) 
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Ordenadores típicos de la segunda 
generación (STRETCH, LARC y 
GAMMA 60) 


OS años cincuenta supusie- 
ron un enorme desarrollo de 
la Informáica. Los ordenado- 
res comenzaron a venderse 
en serie, accediendo a ellos 
un entorno de empresas mu- 
cho mayor que en años an- 

teriores, en que sólo las muy 
potentes económicamente podían disponer de 
ellos. Sin embargo, con las nuevas tecnologías 
a transistores, la fiabilidad ganó, los consumos 
bajaron y con ellos los precios y los proble- 
mas. Las empresas se atrevieron a fabricar en 
serie y empezaron a crear modelos de orde- 
nadores, intentando cubrir todas las necesida- 
des de los usuarios. La idea era comenzar a di- 
señar gamas de productos, para todo tipo de 
usuarios, desde pequeño nivel hasta compli- 
cados sistemas. Esta misma idea es la que apli- 
can las casas fabricantes de automóviles, en 
las que cada marca fabrica desde el sencillo 
utilitario sin complicaciones hasta el sofistica- 
do automóvil lleno de prestaciones, y a un pre- 
cio muy superior. Se trata de captar a todo tipo 
de usuarios. Con los modelos pequeños se ga- 
nan clientes fundamentalmente, con los espe- 
ciales, prestigio. No hay que olvidar que los 
pequeños clientes pueden ir creciendo. Las 
empresas dedicadas a la fabricación y comer- 
cialización de ordenadores también comenza- 
ron a seguir esta pauta, creando equipos sen- 
cillos que generalmente eran compatibles con 
otros de superiores prestaciones, siguiendo 
una gama casi continua. La idea que intenta- 
ban vender es la siguiente: un técnico de la 
casa podría estudiar, junto con el usuario, sus 
necesidades, para proponerle un equipo a su 
medida, pudiendo pasar a ampliarlo cuando 
haya cubierto estas necesidades inmediatas, y 
considere que puede mecanizar otras tareas 
de su empresa. Los programas escritos para 
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los distintos equipos de la misma casa, sin em- 
bargo, no siempre eran totalmente compati- 
bles y requerían algunas modificaciones. 
Pero, además, existía una total incompatibili- 
dad entre las distintas marcas, lo que obliga- 
ba a seleccionar muy bien la casa fabricante, 
al comienzo de la mecanización de la compa- 
ñía, con el riesgo de estar siempre «vendido» 
a comprar en el mismo sitio, 


Otra característica común de la segun- 
da generación es que cada vez se iba tendien- 
do más a realizar procesos secuenciales en 
cinta, Este sistema de proceso es bastante útil 
para la impresión de informes, y para otros ti- 
pos de proceso, pero no es eficaz para consul- 
tas. 


Tampoco hemos hablado mucho de los 
lenguajes de programación. Estos se fueron 
desarrollando poco a poco, pero hasta el mo- 
mento son lenguajes simbólicos de bajo nivel, 
es decir, muy ligados al funcionamiento de la 
máquina, 

Von Neumann siempre había conside- 
rado que el lenguaje más universal para los or- 
denadores era el lenguaje máquina. Sin em- 
bargo, la tendencia que ha ido tomando fuer- 
za con el tiempo es que los ordenadores mo- 
dernos utilicen lenguajes cada día más sofis- 
ticados, en suma, mas próximos al usuario, y 
no a la máquina. 


El gobierno de los Estados Unidos sacó 
a concurso para la Comisión de Energía Ató- 
mica la compra de un ordenador que fuera 
mucho más rápido de lo que hasta entonces se 
conocía. Naturalmente, Univac e IBM partici- 
paron en el concurso. Con la nueva técnica de 
los transistores se trataba, entre otras cosas, 
de obtener velocidades medias en nanose- 
gundos (hasta el momento se medían en mi- 
crosegundos). IBM diseñó para ello el IBM 
7030, llamado también Stretch, en 1960, y Uni- 
vac en LARC (Livermore Automatic Research 
Computer), unos meses antes que el IBM. (El 
Livermore Automatic Research Computer ha- 
bía tomado este nombre debido a la localidad 


AS 
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de Livermore, California, donde se encontra- 
ba la entidad receptora del nuevo ordenador. 
Poco tiempo después, IBM sacó al mercado 
otro ordenador de mejores características que 
el 7030, aunque dentro de la misma línea. Vea- 
mos con algún detenimiento estas máquinas, 
que fueron típicas de la época que estamos in- 
tentando describir. 

Tanto el LARC como el Stretch (e inclu- 
so el Gamma 60 de la Bull, en Francia) eran or- 
denadores especializados para la resolución 
de problemas científicos, Por tanto, se habían 
diseñado considerando las distintas opciones, 
y seleccionando las que más se adaptaran a 
estas necesidades. En los primeros años de la 
segunda generación, había una idea bastante 
clara y general de que las máquinas desarro- 
lladas para funcionar en el mundo empresa- 
rial debían ser preferiblemente decimales, y 
basadas en los caracteres. Para los diseños de 
ordenadores de tipo científico, las tendencias 
eran distintas. Entre sus diseñadores existía 
una fructífera diversidad de opiniones. Unos 
consideraban que era más práctico hacer que 
la máquina fuera decimal, mientras que otros 
muchos consideraban que si utilizaba el siste- 
ma binario, se simplificarían mucho los cálcu- 
los. Pero los sistemas de numeración adopta- 
dos no eran la única diferencia entre unos or- 
denadores y otros, El tipo de memoria auxiliar 
también era un elemento a considerar, junto 
con los dispositivos de entrada-salida. No es lo 
mismo tener que trabajar con cantidades in- 
gentes de información que con un volumen de 
datos de tipo medio. También hay que consi- 
derar la precisión, que en algunas tareas pue- 
de ser necesario que alcance cotas de preci- 
sión muy altas. Resumiendo, se puede optar 
por una variedad de posibilidades, intentando 
minimizar las desventajas de cada una de 
ellas. 

El LARC de Univac comenzó a trabajar 
en sistema decimal. Esta decisión se tomó, no 
sin considerar con todo cuidado la posibilidad 
del binario. Sin embargo, como el volumen de 
datos era enorme, y como resultado, las sali- 
das, se pensó que las conversiones binario-de- 
cimal serían de tal volumen, que la ganancia 
de tiempo no se podría apenas aprovechar, 
debido a las enormes pérdidas de tiempo en 
las conversiones de un sistema a otro. Ade- 
más, existía el problema de los redondeos, 
que siempre producía errores que debían 
tenerse en cuenta, y que era difícil reducir. 

Los diseñadores de IBM, con los mismos 
argumentos, llegaron a conclusiones distintas. 
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Se decidieron por el binario, y esta decisión 
ha afectado a la casi totalidad de los ordena- 
dores que se han ido fabricando. Es seguro 
que si la decisión no la hubiera tomado IBM, 
la habría tomado otra compañía cualquiera de 
ordenadores, en ese momento o en otro. El he- 
cho es que a partir de esa fecha el sistema bi- 
nario se ha ido imponiendo hasta desbancar 
totalmente al decimal. Sus ventajas fundamen- 
tales son que simplifica notablemente la es- 
tructura de la máquina, el cómputo es mucho 
más rápido, el control mucho más sencillo y la 
representación de la información se hace mu- 
cho más compacta. 

Veamos sucintamente la estructura del 
Stretch de IBM, Al estar concebida como má- 
quina para uso científico, podía realizar ope- 
raciones numéricas y no numéricas. Para ello, 
los ingenieros que la diseñaron organizaron la 
palabra básica de 64 bits, formada a su vez por 
8 grupos de 8 bits, a los que más tarde se lla- 
maría bytes. En cuanto al código para crear el 
alfabeto, el que se utilizó era de 8 bits para po- 
der obtener 256 caracteres o posibilidades 
distintas, ya que los alfabetos con que funcio- 
naban las últimas máquinas eran generalmen- 


te de 100 letras y símbolos, siendo relativa- 
mente escasos e incómodos. De los 256 se to- 
maron únicamente 120, ya que tomar más hu- 
biera exigido una impresora muy especial, y 
no tenía tampoco demasiado interés. Volve- 
mos a insistir en que la máquina utilizaba có- 
digo en binario. Esta organización del código 
en elementos de 8 bits, a los que a partir de 
ese momento se llamará bytes, fue muy útil, 
tanto como para haberse mantenido hasta 
nuestros días. 

El sistema de almacenamiento del 
Stretch de IBM era muy avanzado. Es natural, 
ya que uno de los problemas fundamentales 
de los ordenadores científicos suele ser el 
enorme cúmulo de datos, que dificulta todas 
las tareas. En la actualidad existen nuevas téc- 
nicas para abordarlo, utilizando ordenadores 
paralelos, con estructuras pipeline, etc. Sin 
embargo, este problema todavía no está total- 
mente resuelto. Como es primordial disponer 
de una buena memoria, IBM dotó a su modelo 
Stretch de una memoria formada por una pila 
de discos magnéticos, cada uno de los cuales 
era independiente, disponiendo de su propio 
brazo de lectura/escritura. También contaba 
con un sistema llamado TRACTOR de manejo 
de cintas magnéticas. Se trataba, pues, de sis- 
temas muy complejos y rápidos, que podían 
leer/escribir a velocidades muy altas (1,5 mi- 
llones de caracteres por segundo). 

En la serie 360 de IBM se utilizaban pa- 
labras «simples» o de cuatro bytes, o «dobles» 
o de ocho bytes. Las cadenas podían ser nu- 
méricas, o de caracteres, pero todas ellas for- 
madas por bloques de 8 caracteres (o bytes). 
Con este sistema de organizar las palabras, los 
direccionamientos se hacían mucho más sen- 
cillos, 

El ordenador Gamma 60 de Bull dispo- 
nía de una organización de las palabras seme- 
jante, aunque las cadenas que se utilizaban 
eran de 24 bits, algo grandes para codificar 
los caracteres y algo pequeñas para utilizar- 
las como palabra básica. Con el tiempo se vio 
que existían sistemas de codificación mejores. 

La precisión, en estos ordenadores 
científicos, es un problema fundamental. La in- 
troducción de la coma flotante ayudó mucho a 
dominar el problema. Para obtener precisión 
múltiple se podía acceder a un conjunto espe- 
cial de instrucciones. 

Finalmente, el Stretch disponía de sis- 
temas control de interrupciones muy sofistica- 
dos que permitía el multiproceso. Para la re- 
cuperación de los errores existía, además de 
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¿Sabía usted que... 


En alguna ocasión la utilización de un ordena- 
dor puede resultar carísima, incluso para todo un 
banco? 

Efectivamente. El 24 de noviembre de 1985, 
uno de los bancos más importantes de Nueva York 
tuvo que pagar más de un millón de dólares como in- 
tereses al Banco del Estado (Federal Reserve), que 
se hubiera evitado si esta entidad no hubiera dis- 
puesto de servicios informatizados a tan alto nivel. , 

En las fechas de que hablamos, la mayoría de 
las entidades bancarias de los Estados Unidos per- 
tenecía a un servicio de compensación bancaria 
electrónica. Al finalizar la actividad en Wall Street, 
hacia las seis y media de la tarde, comienza la com- 
pensación global de los bancos afiliados a dicho ser- 
vicio. La norma es que aquel que no pueda «satisfa- 
cer» su deuda, si al final de la jornada queda deu- 
dor, quedará automáticamente excluido del servicio 
(naturalmente, podemos imaginarnos el enorme per- 
juicio que ello supone para un gran banco, con mi- 
les de operaciones diarias). 

Con el antiguo sistema de compensación, que 
se llevaba a cabo sobre las diez de la mañana, las en- 
tidades, si eran deudoras, podían recabar el capital 
necesario del mercado monetario para hacer frente 
sin problemas a la situación de cada día. Sin embar- 
go, con el nuevo sistema informatizado, mucho más 
cómodo y simple, si una entidad necesita dinero a 
partir de las seis y media de la tarde, el problema es 
bastante más difícil de resolver, 

En esta situación se encontró en aquella fecha 
uno de los más importantes bancos norteamericanos, 
que tuvo que recurrir a la Reserva Federal para cu- 
brir su déficit de más de veinticinco millones de dó- 
lares. (Bien es cierto que si el sistema informático del 
propio banco hubiera funcionado como es debido, a 
pesar de las dificultades hubiera podido disponer 
del dinero de maniobra necesario, al menos cori un 
coste menor.) No hay duda que una sociedad infor- 
matizada requiere la revisión de leyes y normas pe- 
riódicamente. 


la consola normal para el operador, otra para 
el equipo de mantenimiento. Este podía utili- 
zar en su análisis de la máquina todo un com- 
plejo programa de comprobaciones que ayu- 
daba a detectar los problemas. Estos últimos, 
en algunos casos, podían subsanarse directa- 
mente, sin tener, por ejemplo, que detener por 
ello la ejecución de algún programa. Ade- 
más, el equipo se entregaba junto con unos 
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programas de diagnóstico, que facilitaban 
enormemente la identificación de las averías. 
Estos sistemas de detección de fallos y averías 
eran de lo más avanzado. Estaban basados en 
otros diseñados por la IBM para sus ordenado- 
res del proyecto SAGE (Semi Automatic 
Ground Environment) de defensa antiaérea 
norteamericana. Como es de imaginar, en el 
proyecto SABE, la fiabilidad y la rápida repa- 
ración de errores eran objetivos fundamenta- 
les, 

Se vendieron ocho unidades del orde- 
nador Stretch. El precio puede parecer exor- 
bitante (ocho millones de dólares), pero es im- 
portante recordar los enormes gastos en in- 
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vestigación de las compañías fabricantes. Los 
nuevos modelos, menos probados, exigían 
gastos mucho mayores, tanto en comprobacio- 
nes y otras pruebas, etc., como en el desarro- 
llo de sistemas operativos sofisticados, que 
controlaran adecuadamente todas las innova- 
ciones introducidas a las máquinas. También 
era necesario desarrollar los compiladores 
para los nuevos lenguajes de programación 
que iban apareciendo, etc. No pensamos que 
las grandes compañías han sido instituciones 
benéficas interesadas únicamente en el pro- 
greso de la Humanidad. Sin embargo, al bus- 
car su beneficio, han ayudado a avanzar a la 
técnica en su lento y dificultoso caminar. 


TEMAS MONOGRAFICOS DE VANGUARDIA 12% 


Control del proceso deductivo 


E suele utilizar el término in- 
glés «backtracking» para 
designar un proceso de 
«vuelta atrás» que se realiza 
con cierta frecuencia en los 
procesos de búsqueda. En 
efecto, el esquema de exa- 
men de la base de conoci- 
miento no suele llevar un camino en una sola 
dirección, sino que, en ocasiones, llega a un 
punto en que debe «volver atrás» y seguir por 
otro camino o bien detener su búsqueda. 

El proceso de «vuelta atrás» es suma- 
mente interesante y añade mucha flexibilidad 
al esquema de búsqueda, pero requiere un 
conjunto adicional de controles que dificultan 
la programación del motor de inferencia (hay 
que guardar información sobre los valores de 
los hechos en cada paso para retomar la situa- 
ción —hechos demostrados y no demostrados, 
reglas utilizadas y reglas de las que no se ha 
hecho uso, etc.— en el punto a donde se vuel- 
ve para tomar un camino alternativo). 


Utilización de lógica de primer orden 


Si en lugar de utilizar la lógica de pro- 
posiciones se hace más sofisticado el entorno 
de representación del conocimiento pasando 
a utilizar lógica de primer orden (cálculo con 
predicados), la representación de datos es 
más flexible, pero el control del proceso re- 
sulta más complicado. En efecto, la introduc- 
ción de variables en las reglas de producción 
supone abordar un verdadero riesgo de «ex- 
plosión» de hechos demostrados o por demos- 
trar. En los casos más sencillos las proposicio- 
nes (hechos) a manejar están dados, y sólo du- 
damos de su valor («el animal vuela» es ver- 
dadero = V, falso = F o desconocido = D), sin 
embargo, sí decimos «todo ungulado es un ma- 
mífero», o, lo que es lo mismo, «si X es ungu- 
lado, X es mamífero» (es decir, «ungulado (X) 
— mamífero (X)») para sacar conclusiones, de- 
bemos «instanciar» o particularizar la variable 
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«X» (en principio, cualquier animal): y así pre- 
guntarnos si será verdad o no que ungulado 
(loro), ungulado (jirafa), ungulado (avestruz), 
ungulado (murciélago), ungulado (cebra)... 
Además, como normalmente no se producirá 
la instanciación de la regla para todos los va- 
lores posibles, sino sólo para aquel o aquellos 
que en cada momento nos interesa, las reglas 
ya no son (como en el caso del cálculo de pro- 
posiciones) de utilización una única vez, sino 
que en cada paso deductivo se pueden utili- 
zar, con lo que hay que controlar no si la re- 
gla se ha utilizado o no, sino si ha sido usada 
con tal o cual variable. 


Además, en cada regla puede haber 
varias variables que se particularizan inde- 
pendientemente unas de otras. Concretamen- 
te, si en una regla aparecen cuatro variables 
(caso usual en un sistema real), y disponemos 
de cincuenta hechos conocidos en el momen- 
to considerado, se pueden probar 50 elevado 
a 4 (más de 6 millones) de combinaciones di- 
ferentes; ya se comprende que, por muy po- 
tente que sea el equipo sobre el que se esté 
trabajando, la búsqueda exhaustiva es impen- 
sable en un caso como el considerado. Es ne- 
cesario establecer un mecanismo automático 
de conducción del proceso deductivo. En 
cada momento, el orden (dinámico) en que 
conviene evaluar las premisas para localizar 
el conjunto de valores (cuatro en el caso que 
acabamos de proponer) que hay que seleccio- 
nar para aplicar la regla correspondiente de- 
pende del contexto y/o de la propia estructu- 
ra de la regla. 


El ciclo de base de un motor de infe- 
rencia suele tener tres fases: localización de 
las reglas utilizables en ese momento, elección 
de la regla a aplicar entre las posibles (en el 
caso de la lógica de predicados que estamos 
considerando es el momento de instanciación 
de las variables para elegir no sólo la regla a 
utilizar, sino la n-tupla de valores con los que 
se va a usar) y realización de la deducción 
propiamente dicha con la regla y valores con- 
siderados. 


Las estructuras de control utilizadas en 
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los diferentes sistemas son muy diferentes 
(elección en función del interés de la regla se- 
gún el objetivo a obtener, elección según un 
juego de hechos considerados básicos, elec- 
ción de la primera regla encontrada, búsque- 
da exhaustiva, etc.). 

Uno de los sistemas más interesantes es 
el utilizado en el generador de sistemas ex- 
pertos SNARK: en la etapa primera de detec- 
ción de las reglas a utilizar se considera para 
cada regla un conjunto de «palabras clave» 
que son las propiedades o valores significati- 
vos que aparecen en la regla y se marca la re- 
gla como inutilizable (en ese momento) si al- 
guna de sus palabras-clave no aparece en la 
base de hechos; si, por el contrario, todas las 
palabras-clave de la regla aparecen al menos 
una vez en la base de hechos se anota que esa 
regla es utilizable en ese ciclo. 

A continuación se van examinando las 
reglas «utilizables», para la localización de la 
«n-tupla» de valores que permitirán activar esa 
regla. 

Para ello, considera tres tipos diferen- 
tes de premisas y selecciona la regla según el 
tipo de premisas que aparecen en cada una, 

Los tres tipos son: 


Tipo 1. «propiedad N (X) = a», y la ins- 
tanciación consiste en localizar un elemento 
incógnito «X» que cumpla que su «propiedad 
N» valga «a». Este elemento «X» (candidato pro- 
visional a ser uno de los valores selecciona- 
dos) se llama «zombi», en el argot, 

Tipo 2. «propiedad N (Z) = X», donde 
«Z» es un elemento (zombi) resultado de una 
instanciación anterior. X es el nuevo zombi a 
localizar. 

Tipo3. «propiedad N (X) = Y», hay que 
localizar simultáneamente una pareja de valo- 
res que cumpla la expresión. 


Se selecciona la regla según el tipo de 
premisas que aparecen en ellas (primero tipo 
1, luego tipo 2, por último, el tipo 3) y, en caso 
de igualdad de tipo de premisas, se elige 
aquella cuya propiedad aparece mayor núme- 
ro de veces en la base de hechos. 


Se recorre la base de hechos seleccio- 
nando (encadenando) por valor o propiedad y 
se toman los objetos que se adecúan al mode- 
lo de búsqueda que estamos realizando (se va 
creando una pila con los valores obtenidos). 
A continuación se «repercuten» los valores se- 
leccionados sobre las premisas no evaluadas 
y sobre la parte de conclusión de la regla. De 
esta implicación pueden surgir instanciacio- 
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nes nuevas o cambio de tipo de premisas, que 
son tomados en cuenta en el siguiente ciclo. 

Si aparece una contradicción con la 
base de hechos (que se ha utilizado) o no se 
ha podido realizar elección alguna de regla, 
se vuelve atrás, se saca de la pila la anterior 
selección hecha y se continúa el proceso con 
ese nuevo valor. 

Naturalmente, la estrategia descrita es 
un caso particular (interesante, eso sí) de un 
motor de inferencia (cualquier definido sobre 
un paquete SNARK) y las posibilidades que 
aparecen en distintos sistemas basados en el 
conocimiento, son muy variadas. Hemos pues- 
to este ejemplo para mostrar al lector cómo se 
complica la gestión del proceso deductivo con 
la introducción de la lógica de primer orden. 


Aplicación a otros esquemas 
de representación 


Aunque el esquema de representación 
no sea la lógica, los sistemas de producción si- 
guen siendo un procedimiento válido de de- 
ducción. Podemos pensar en un esquema de 
representación de tipo atributo-valor para el 
objeto: «ir al teatro» (*). Se utilizarán las pare- 
jas correspondientes a los siguientes atributos: 
«Distancia» (para representar la distancia en 
km de mi casa al teatro), «Tiempo» (tiempo de 
que disponemos hasta el comienzo de la re- 
presentación, en minutos), «Medios» (procedi- 
miento genérico para ir al teatro; puede ser 
conducir o andar), «Situación» (se refiere a la 
ubicación de mi casa; puede ser: afueras o 
centro), «Meteorología» (que representa el 
tiempo atmosférico que hace; puede ser: bue- 
no o malo) y «Acción» (modo efectivo por el 
que iré al teatro; se consideran cuatro posibles 
acciones de tomar: pedir-un-taxi, ir-en-coche, 
abrigarse-e-ir-andando e ir-andando). 

Partimos de la siguiente base de cono- 
cimientos. 

Regla 1. Si Distancia es más de 10 km 
—= Medios es conducir, 

Regla 2. Si Distancia es más de 2 km, 
pero menos de 10 km, y Tiempo es menos de 
20 min. —> Medios es conducir. 

Regla 3. Si Distancia es más de 2 km, 
pero menos de 10 km, y Tiempo es más de 20 
min. —> Medios es andar. 


* Seguimos un ejemplo presentado por Harmon y 
King en su libro Expert Systems. Ed. John Wiley € Sons, 
1985. 


Medios 


Regla 4. Si Medios es conducir y Situa- 
ción es afueras —> Acción es pedir-un-taxi. 

Regla 5. Si Medios es conducir y Situa- 
ción es centro — Acción es ir-en-coche. 

Regla 6. Si Medios es andar y Meteo- 
rología es mala — Acción es abrigarse-e-ir-an- 
dando. 

Regla 7. Si Medios es andar y Meteo- 
rología es buena —> Acción es ir-andando. 

Si tratamos de averiguar «cómo ir al tea- 
tro», el objetivo es saber qué valor debe tomar 
el atributo acción. Se puede comenzar con en- 
cadenamiento hacia atrás, viendo que el obje- 
tivo Acción (con diferentes valores asociados) 
aparece como consecuencia en las reglas 4, 5, 
6 y 7. 

Para saber si se puede deducir el valor 
«pedir-un-taxi» del atributo Acción hay que sa- 
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Fig. 1. 


ber si Medios tiene el valor «conducir» (o no) 
y si situación tiene el valor «afueras» o no. 

Para averiguar el valor de Medios de- 
bemos acudir a las reglas 1, 2 y 3, que tienen 
este atributo como consecuente. De la regla 
primera obtenemos la necesidad de saber la 
distancia a que se encuentra el teatro de nues- 
tra casa: el sistema lo preguntará y si la res- 
puesta es 5 km, por ejemplo, es decir, «menos 
de 10 km, pero más de 2 km» no se puede ac- 
tivar la regla 1. Toma la siguiente posibilidad 
de obtener un valor para el atributo. Medios 
(objetivo de búsqueda actual). La regla 2 le 
«sugiere» preguntar por el tiempo de que dis- 
ponemos para ir al teatro. Si contestamos que 
tenemos 10 min de tiempo, se dispara la regla 
2 y pasamos a saber que Medios vale «condu- 
cir». 


CENT 
COTOS 


Abrigarse 
e ir andando 


Fig. 2. 
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Dependiento de cómo esté previsto el 
proceso de control de deducciones, ahora se 
aplicará el dato obtenido, en encadenamiento 
hacia adelante, para llegar a concluir valores 
de Acción o no; y, por otro lado, seguirá exa- 
minando las restantes posibilidades del atri- 
buto Medios (según la regla 3) o no; puede que 
se admitan varios valores de un atributo (en 
este caso significarían opciones alternativas 
para ir al teatro) o que se consideren contra- 
dicciones y se rechacen, 

Una vez sabido que Medios es «condu- 
cir», el sistema preguntará la situación de la 
casa (regla 4). Si decimos que «afueras», de- 
ducirá el valor «pedir-un-taxi» para Acción. Si 
sólo queríamos un valor (o el sistema está pre- 
parado para dar un solo valor de cada atribu- 


58 


to) el proceso deductivo concluye. En caso 
contrario, el proceso continúa observando 
otros posibles valores del atributo Acción, 
pero las reglas restantes (5, 6 y 7) no pueden 
activarse (por la situación la 5 y por los me- 
dios la 6 y la 7). El proceso concluye. 


Como se ve, el modo de trabajo es el mismo 
ya descrito anteriormente, pero aquí se mane- 
ja globalmente el concepto de atributo (y se 
examinan sus posibles valores). Esto suele su- 
poner el análisis global (aunque sucesivo, na- 
turalmente) de varias reglas y suele dirigir el 


backtracking de tal modo que la búsqueda se 


circunscribe a los valores de un atributo antes 
de pasar a otro atributo o a otra regla gené- 
rica. 


TERMINOLOGIA 


Adquisición de conocimiento. Proceso de 
extracción, estructuración y organización 
del conocimiento, partiendo de alguna fuen- 
te de conocimiento (generalmente una per- 
sona experta), y que puede utilizarse en un 
programa. 


Arbol. Gráfico en el que sólo existe un cami- 
no entre dos nodos distintos. 


Base de conocimientos. Una parte del sis- 
tema basado en el conocimiento, o sistema 
experto que contiene el cónocimiento sobre 
el dominio de que se trate. 


Base de datos. Conjunto de hechos, aseve- 
raciones y conclusiones que se utilizan para 
concordar las partes condicionales (IF) de 
las reglas, en un sistema basado en reglas. 


Ciclo de reconocimiento. Bucle interactivo 
que tiene tres fases: concordancia, resolu- 
ción de conflictos y disparo de las reglas. 


Distintivo. Instancia de un tipo. También 
puede ser un átomo único que puede utili- 
zarse como etiqueta, o bien un símbolo uti- 
lizado en el algoritmo de concordancia de 
Rete para representar un elemento de la 
memoria de trabajo. 


EMYCIN. La primera herramienta de cons- 
trucción de sistemas expertos. EMYCIN de- 
riva del sistema experto MYCIN, Después 
de desarrollar MYCIN, los diseñadores con- 
sideraron que podían extraer el conoci- 
miento médico específico de MYCIN (es de- 
cir, el MYCIN esencial). El módulo-concha 
(shell) resultante consiste en una máquina 
de inferencias de encadenamiento hacia 
atrás, un director de consultas, y varias ayu- 
das de adquisición de conocimiento. Esta 
«concha», o herramienta, podía combinarse 
con otra base de conocimientos para crear 
un nuevo sistema experto. 


Espacio de un problema. Gráfico en el que 
los nodos representan todos los estados po- 
sibles de las soluciones parciales o comple- 
las del problema, y los arcos representan 
los operadores que transforman un estado 
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en otro. La búsqueda de la solución al pro- 
blema que se está considerando se repre- 
senta estableciendo un camino a partir del 
nodo que representa el estado inicial, hasta 
el nodo que representa el estado objetivo, 


Ingeniero del conocimiento. Aquella per- 
sona que diseña y construye el sistema ex- 
perto. Suele ser un experto en la aplicación 
de métodos de inteligencia artificial. 


Jerarquía de herencia. Estructura dentro 
de una red o sistema de estructura semán- 
ticos, que permite a los elementos inferiores 
en la red heredar propiedades de los ele- 
mentos más altos en dicha red. 


Lenguaje de contexto libre. Lenguaje for- 
mal en el que cada sentencia se puede ge- 
nerar mediante una gramática en la que el 
lado izquierdo de cada regla de reescritura 
consiste en un único símbolo no terminal. 


Ligaduras parciales. Conjunto de elemen- 
tos de la memoria de trabajo y ligaduras 
que constituyen una ligadura consistente 
para una secuencia prefijada de elementos 
de condición de una regla. 


Metaconocimientos. En un sistema exper- 
to, conocimiento de cómo el sistema opera 
o razona, por ejemplo, el conocimiento de 
cómo éste utiliza y controla el conocimiento 
del dominio. Conocimiento sobre el conoci- 
miento. 


Métodos orientados al objeto. Métodos de 
programación basados en la utilización de 
elementos llamados objetos, que se comuni- 
can unos con otros a través de mensajes. 


Programa de un sistema de producción. 
Programa de aplicación escrito en un len- 
guaje de sistema de producción y en el que 
la mayor parte del problema se lleva a cabo 
disparando las reglas. 


Razonamiento dirigido mediante su- 
puestos. Estrategia de resolución de pro- 
blemas que genera hipótesis sobre los acon- 
tecimientos que se espera ocurran, centrán- 
dose en procesar las tareas relacionadas 
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con esos acontecimientos. La actividad de 
esta estrategia contrasta con la pasividad 
del razonamiento dirigido a los datos. 


Red semántica. Estructura de datos para re- 


presentar el conocimiento declarativo. Esta 
estructura es un gráfico en el que los nodos 
representan conceptos (elementos diver- 
sos), y los arcos (que pueden llevar etique- 
tas) representan las relaciones entre los 
conceptos. 


Sistema «runtime» o versión «runtime». 


Las herramientas de construcción de los sis- 
temas basados en el conocimiento permiten 
al usuario crear y ejecutar varias bases de 
conocimiento. Con una única herramienta, 
el usuario puede crear docenas de bases de 
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conocimiento. Dependiendo del problema 
al que se encare el usuario, cargarán una 
base de conocimientos apropiada y llevarán 
a cabo consultas. Con esta herramienta, el 
usuario puede modificar fácilmente una 
base de conocimientos. Las compañías que 
desarrollan bases de conocimiento especí- 
ficas no desean que el usuario «cargue» la 
base de conocimientos, ni que sea capaz de 
modificarla. Cuando una herramienta de 
construcción de un sistema experto se mo- 
difica para incorporar una base de conoci- 
mientos específica, y para desactivar algu- 
nas de las características de programación, 
el sistema resultante se dice que es un «run- 
time system» o una versión «runtime». (A ve- 
ces se llaman sistemas de «solo ejecución»). 


